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信頼 と 創造 の 高士 通 


豊富 に 揃っ た ソリ フト ウェ ア が 、 
ML 選 の 財力 を xoopsu- 人 半 
フル に 8| 寺 出し ます 2 / 


卓越 し た ハー ドウ ェ ア の 機能 を 誇る パー ソナ ルコ ン ピ ュ 
ー タ FUJITSU MICRO 8 に 、 本 格 的 な ソフ トウ ェ ア の サ 
記 ボー ト が 始ま っ て いま す 。 日 本 語 ワ ー ド フ プ " ロ セッ サ 用 ソフ 
トウ ェ ア を は じ め 、 ビジ ネス 用 ツー ル と し て 現在 注目 され 
て いる 簡易 言語 が 充実 。 も ちろ ん 、 総 務 ・ 財 務 ・ 経 理 、 営 
業 、 顧客 、 統計 な どの アプ リケーション ソフ ト 5 業 務 に 合 
わせ て 選ぶ こと が で きま す 。 約 300 種 と 豊富 に を ろ っ た 実 
用 的 な ツク フト ウェ ア が FM-8 の 利用 範囲 を きら に 拡げ ます 。 


新 製品 

@S タ イプ ミニ FD ユ ニッ トド eeeeeseseseiesnsssssss \148,.000 
@ ミニ フロ ッ ピ ィ デ ィ ス ク ド ラ イブ \90,.000 
e 計測 制御 イン タフ ェ ー ス モジ ュー ル …… の tt \61,.000 
@ RS-232C イ ンタ フェ ー ス モジ ュー ルー \30,000 


S タ イプ ミニ FD ユ ニッ ト ミニ フロ ッ ピ ィ ディ スク ドラ イプ 


FM-8 の 主 な 特長 

@ JIS 第 一 水準 の 漢字 を 含む 3.418 字 の 日 本 語 表 示 

@ UCSD Pascal"、FLEX「W、CP/M ぐ や を DOS と し て 採用 
@ ビジ ネス ユー ス に 十分 な 能力 を そなえ た 周辺 機器 を 採 圧 
@ 8 色 が 使え る 640X200 ド ッ ト の 高 解像度 カラ テー グラ フィ ッ ク 

@ バブ ルカ セッ ト な ど 、 多 彩 な 補助 記憶 装置 を 採用 

@ 本 体内 に 豊富 な 各種 イン タフ ェ ー ス を 標準 実装 


UCSD Pascal、FLEX、 CP/M は それ ぞ れ カリ フォ ルニア 大 学 理事 会 、TSC 社 、DigitalResearol 
社 の 登録 商標 で す 


本 体 \218.000/ キ ャ ラク タ セ ッ ト ( 非 漢字 )\10,.000・( 漢 字 ) 
\30,000/ 高 解像度 カラ ーCRT デ ィ ス プレ イ \188.000/ ビ ジ ネ 
スプ リン タ \350,.000/ フ ロン トイ ン サ ー タ \89,000/ 標 準 フロ ッ 
ピ ィ アダ プ タ \58,000/ シ ステ ム 拡 張 ユ ニッ ト \133,000/Z80 カ 
ー ド \11.700 


日 本 語 ワ ー ド プロ セッ サン ソフ トウ ェ ア の 登場 に よ 
り 、FM-8 が 本 格 的 な 日 本 語 ワ ー ド プロ セッ サ に 
な 0 まま 処理 し た 情報 を 、 グラ フ 化 ・ 文 書 化 すれ ノ パ 3 

ー ソ ナル コン ピュ ー 
ば 、 そ の まま 報告 書 と し て 使 用 する こと も で きま す 。 ーー 


ーー 
『IM-B は 、 ビジ ネス の 効率 化 に 欠か せな い が ま 3 U り JI 1 に 19 リ 
ツー ル と し て 、 さま ざま な 分 野 で 利用 で きま す 。 E TITC 民 〇 O 


富士 通 株 式 会 社 : 

半導体 統轄 営業 部 〒!05 東京 都 港 区 虎ノ門 2-3-13( 第 18 森 ビル ) TEL(03) 502-01I61 

富士 通 マ イコ ンス カイ ラブ 東京 月 一 金 9:30-I7:00 土 9:30 一 !3:00( 祝 日 を の ぞ く ) TEL(03) 502-01I61( 代 ) (03) 591-1091・2561 (直通) 

@ 大阪 月 一 金 0:00 一 7 :00( 祝 日 を の そく) TEL(06)341-0486( 直 通 ) @ 名 古屋 月 一 金 10:00 一 !8:00( 祝 日 を の ぞ く ) TEL(052) 221-6016( 直 通 ) 
マイ コン クラ ブ へ FM-8 の 情報 を 提供 し ます 。 クラ ブ 名 、 使 用 機種 名 、 会 員数 、 代表 者 名 連 給 先 の 電話 番号 ・ 住 所 を 上 記 住 所 あて ハガキ で お 知ら せく だ さい 


ん /J/ ガ が 簿 味 講座 


マイ コン 入門 


5/ を 後期 05-3』30 毎 通 水 キ 後 7:3U-6:DOU 


教育 テレ ビ 


再 放送 毎週 日 曜 日 0 


講師 
山梨 大 学 教授 
吉澤 正 


司会 ・ 進 行 
須磨 佳 津江 


〇 1982 日 本 放送 協会 


この 本 は NHK 趣 味 講座 マイ コン 入門 の 後期 放送 の テキ 
スト で す 。 テキ スト は 放送 の お お よそ の 内 容 を 示す と と 
も に , 放送 の 前 に 了 予習 し た い 人 や , 後 で も う 一 歩 つ っ こ 
ん で 自分 な り に いろ いろ や っ て みた い 人 の た め に 用 意 し 
7 と (もやい の の GS: 

放送 の ね らい は , 前 期 後期 を 通じ て , マイ コン の 持っ 
て いる すばらし い 力 と 楽し さき を , な る べく 多く の 人 に 感 
じ と っ て も ら う こと で す 。 それ も , た だ 表面 的 に , 他人 
事 と し て 傍観 する と いう の で は な く て , 一 人 一 人 が 実際 
に 触れ て みよ う , 使っ て みよ うと いう 態度 で , 自分 自身 
の 課題 と し て これ か ら の 社会 で の マイ コン の 役割 を 考え 
て みて も らい た いと 願っ て いま す 。 

前 期 の 放送 を 熱心 に 視聴 され . マイ コン に すでに 習熟 
され た 方 も 多い で し ょ う 。 後期 も そう いう 人 達 に 再び 楽 
し く 見 て も らい た いこ と は いう まで も あり ませ ん 。 し か 
し , 前 期 途中 で 時 間 の 都合 で 視聴 を 中 断 さ れ 後 期 に 改め 
て 見 た いと か , さら に は 後期 か ら 初め て 見 て みた いと い 
う 人 達 も 多い と きい て いま す 。 そこ で , 後期 の 内 容 は , 
初め て の 人 に も 十分 に 理解 で きる , むし ろ 前 期 よ り も や さ 
し い ぐ ら い の 題 材 を とりあげ な が ら , 前 期 に 引き 続い て 
見 て も ら う 人 達 に は 、 自 分 の 血 と な り 力 と な っ て さら に 
楽し み が ま す よ うに と 考え て いま す 。 画面 に 美しい 模様 
や 図案 を くり ひろ げた り , グラ フ や 作 表 . デー タ の ば ら 
つき の 表示 を 工夫 し た り , 楽し い 一 人 遊び の ゲー ム を し 
た り し な が ら , プロ グラ ム の 理解 の 基礎 と な る 処理 手順 
や 算法 の 考え 方 を 説明 し て ゆき ます 。 

マイ コン の 楽し み は , マイ コン ゲー ム ば か り で は あり 
ませ ん 。 使い こなせ ば 使い こなす ほど に 自分 の 思い ど お 
り に 働か せる よう に な っ た と き の 喜 び は 大 きい も の で す 。 
その 喜び を 知っ て マイ コン に 夢中 に な っ て いる 人 が 多い 
の で す 。 マイ コン を 楽し お 仲間 が 少し で も 増え る こと を 
願っ て いま す 。 


日 本 放送 協会 講師 吉澤 正 


表紙 ・ 口 絵 撮影 河井 邦彦 
表紙 構成 ・ レ イア ウト ンプ 帆 オ ー ク 
イラ スト ン / 白 吉 辰 三 


講座 を 楽し むために 4 
1 マイ コン に 親 し も う …… の imim 10 月 6 日 …… 10 月 10 日 ………… 6 
2 図案 を 楽し も oo 13 日 ………… 17 日 ……… 10 
3 対話 の すす め …… ド imeomooerrnrrnrrenrrrr… 20 日 ………… 24 日 ……… 16 
4 模様 の 色づけ oe 27 日 …( の (の [| 上 31 日 ……… 21 
5 な ぞ な ぞ を 人 遊び ee 11 月 3 日 …… 11 月 7 日 ……… 26 
じじ 型 を 見 っ つけ ii 10 日 … つ の ……… 14 日 ……… 32 
アプ 答え 合わ も せ omo 17 日 …O の の 21 日 ……… 37 
8 バス て 乗客 … ド eee 24 日 …0 の 中 … 29 日 ……… 43 
忘れ物 の パレ ー ト 図 で roo 12 月 1 日 …… 12 月 5 日 ……… 48 
10 比 率 で くら やる ooo 日 …0 の ti の …… 12 日 ……… 54 
11 移り 変わ り の グラ フ … ド eee 15 日 つの 19 日 ……… 61 
12 ば ら つ まき の 表 示 … ieoeoereeeen 22 日 …… つ の @…… 26 日 ……… 69 
13 お し どり 人 遊び ooo 2d 日 eee 74 

| マイ コン に よる ヵ ラ ー 画 面 … に ee 81 | 

14 プ ログ ラム の 仕組 みつ reo…… 1 月 5 日 …… 1 月 9 日 ……… 89 
15 動 き を っ ける io 12 日 … の ………… 16 日 ……… 94 
16 ラ ンタ ダム に 進 も ooo 19 日 … で の 宝 23 日 ……… 100 
17 メ ニュ ー で 選ぶ oooeeeeerrnrnrnrrr 26 日 …… の ie…… 30 日 …… 106 
18 ゲ ー ム の 記録 … ぐ oo 2 月 2 日 …… 2 月 6 日 ……… 113 
19 暗 号 文 を 作ろ う TYOYYODOCO CO 9 日 …………… 13 日 ……… 120 
20 有 繰り 返し の 模様 ooo 16 日 … つ の ……… 20 日 …… 126 
21 ブロ ッ ク 遊 im 23 日 … で の の の 27 日 …… 132 
22 順 番 に 並べ る ii 3 月 2 日 …… 3 月 6 日 …… 137 
23 重 さ を そ ろ え る TTYLC い て CD 9 日 … の で の … 13 日 ……… 144 
24 は か り を つなぐ で ooo 16 日 …………… 20 日 ……… 151 
25 電 子 で お し ゃ で へ り ぐ oeoeoeoeonennn 23 日 … の 0 の ir…… 27 日 ……・ 156 
26 プロ グラ ム 作 り を 楽し も う …… eee 30 日 …… 4 月 3 日 …… 161 

マイ コン (機種 X) の キー ボー- ド …… ド ドド ooo 164 
BASIC 用 英語 ミニ ミニ 辞典 ( 開 素 引 ) で に ememeoeoeooonoenoennm… 166 
記号 の 名 称 と お も な 使い 方 一 覧 …… ド ドド ooonnmom… 171 
文字 の 生 172 
「 や っ て みよ う 」 の 解答 例 …… ド oe 173 
6 プロ クラ ム 集 …… ド ドド ドド ドド 177 


圏 マ イコ ン と の 付き 合い 


2 ジン 6 WI ポアロ 、) 志 は SS 三 や 
ジョ プロ コジ 。 こ ん こん と 湧き 出 ず 泉 の よう で す 。 
その うち に , お 母さん 用 コン ピュ ー タ 「 ま ざ コ ン 」, 
子供 用 「 ろ り コ ン 」, 衝 百 屋 さ ん 向け 「 ダ イコ ン ,」, 
床屋 さん 向け 「 バ リコ ン 」 な ど が 出現 する か も し 
れ ま せん 。 

今日 の 社会 は 。 これ まで 規格 化物 質 化 に よる 効 
率 を 追求 し て 物質 的 に 豊か な 社会 を 作ろ うと し て 
きた の に 対し , 人 々 の 要求 が きわ め て 多様 化し て 
きた と いう 特徴 が あり ます 。 こ の 傾向 は 書店 に 並 
ぶ 雑 誌 の 多種 多様 さか ら も うか が えま す 。 

マイ コン を 含む コン ピュ ー タ の 最大 の 役割 は , 
「 人 々 の 多様 な 要求 を 満足 させ て ゆく た め の 最 も 
有力 な 道具 に な る こと 」 と 考え られ ます 。 一 方 で 
組織 や 人 間 は と き に 他 の 人 に は 好ま し く な い 欲求 
を 持つ こと も あり , それ を 満足 させ る た め に コン 
ピュ ー タ を 利用 し た いと いう 誘 惑 に か られ る こと 
も な いと は いえ ませ ん 。 し た が っ て , 私 た ち は コ 
ンピュータ を 一 部 の 専門 家 ま か せ に せ ず , コン ピ 
ュー タ の 特性 を 理解 し て お く 必 要 が あり ます 。 

そう いう 点 で 。 マイ コン が 私 た ちの , 私 た ち に 
よる , 私 た ちの た め の コ ンピュータ と し て 広い 層 
に 親しま れ て き て いる こと は 喜ば し いこ と で す 。 
と くに , マイ コン を 趣味 と し て , つま り 楽 し め る 
対象 と し て いる 人 々 が 増え る こと は 望ま し いと い 
に の の) 

マイ コン で 何 を し て 楽し む の か , それ は 一 人 一 
人 に 考え て いた だ く こ と で す 。 ゲ ー ム を 楽し む 人 , 
独自 の プロ グラ ム の 創作 に 喜び を 持つ 人 , マイ コ 
ン 自 体 を 組み 立て て 楽し む 人 , マイ コン に シン セ 
. サイ ザー を つけ て 楽し む お 人 , マイ コン を 使っ た ロ 
ボッ ト な ど を 作っ て 楽し む 人 , マイ コン に いろ い 


ろ な 機械 を 接続 し て その コン トロ ー ル を 楽し む 人 , 
その 多様 性 こそ マイ コン な ら で は の 特徴 で す 。 


較 講 座 の ね らい 


まえ が き で も 触れ た よう に , 放送 の ね らい は , 
私 た ちの , 私 た ち に よる , 私 た ちの た め の マ イコ 
ン と し て ,。 マイ コン の 持っ て いる すばらし い 力 と 
その 楽し さき を , な る べく 多く の 人 に 感じ と っ て も 
ら : う と: で す 。 

後期 の 放送 は , 前 期 と は 異な る 題材 を 用 いな が 
ら , む し ろ や さ し く か みく だ いた 内 容 に な る で し ょ 
う 。 後期 か ら 初め て 視聴 され る 人 に も 十分 に 理解 
し て も ら え る と 思い ます 。 前 期 の 放送 を 熱心 に 視 
聴 さ れ マ イコ ン 入 門 を 卒業 と いう 人 達 も 多い と 思 
いま す 。 し か し , そう いう 人 達 に も 引き 続い て 見 
て いた だ き , さら に 血 と な り 肉 と な る よう な 力 を 
つけ て も ら え る 番組 と な る よう に 努力 し て いま す 。 
見 て 楽し い , 見 る だ け で も 楽し い 番組 作り を め ざ 
し て スタ ッ フ 一 同 で 工夫 し て いま ず 。 


一 初め て の 人 に 


と に か く マ イコ ン に さわ っ て みて 下さ い 。 別 に 
芝 ろ し くも こわ くも あり ませ ん 。 少々 乱暴 に 扱っ 
て も めった な こと ' で は こわ れ ま せん 。 ' 最 近 安 は 
街角 の 電気 屋 さ ん や 文房具 店 に も マイ コン が 並べ 
られ て いま す 。 

ス ダ ジ オ で 使う マイ コン を 紹介 し て お きま し ょ 
う 。 前 期 と 同じ 機種 X 々 です 。 機種 X を 外 か ら 見 た 
次 が 図 1 で す 。 普通 の マイ コン の 機器 構成 は 次 の 
まう 作 な っ で MA ます 。 

中 央 処理 装置 (CPU) 

情報 の 処理 や 接続 され る 各種 の 機器 の 制御 を 

行い ます 。 マイ コン の 頭脳 に あたる も の で す 。 

主 記 憶 装置 (メモ リ ) 

デー ツタ や プ B グ ラム を 記憶 じ ま 謎 。 GB50E 
メモ リ は 鍵盤 の 中 に か くれ て いて 目立ち ませ ん 。 

し か し , 集積 回 路 の 技術 の 進歩 の お か げ で , C 

PU と メモ リ が 小さ い 石 の 小片 (チッ プ ) と し 

で 作 欠 る まう な っ た こ ど に と こそ ぞ そい マシ 5 

すなわち マイ クロ コン ピュ ー タ の 秘密 が ある の 


で です.。 
表示 装置 (ディ スプ レイ 装置 ) 

マイ コン か ら 人 間 に 情 報 を 伝え ます 。 家庭 用 
の テレ ビ で も 代用 で きま す が , 専用 の 装置 は 解 
像 度 や 色 つ き の 表 示 が で きる 点 で 優れ て いま す 。 
スタ ジオ で は 7 色 が 使え る 高 解像度 の 表示 装置 
を 使っ て 色 つ き の 図 案 や グラ フ を 楽し ん で も ら 
いま す 。 
鍵盤 (キー ボー ド ) 

人 間 か ら マ イコ ン に 指令 や 情報 を 伝え る 道具 
で す 。 鍵盤 で の キー の 操作 , つま り タ イプ に 代 
れる こと が 初め て マイ コン を 使う と き の 課 題 で 
す 。 タ イプ の 練習 を マイ コン で する の も 結構 楽 
し いこ と で す 。 機種 メ の 鍵盤 の キー 配列 の わか 
る 写真 は 付録 164 頁 に あり ます 。 
補助 記憶 装置 

主 記憶 の プロ グラ ム や デー タ は マイ コン の 電 
源 を 切れ ば 消え て , つま り 忘 れ ら れ て , し まい 
ます 。 主 記憶 に 覚え 込ま せら れる 情報 の 量 は 限 
られ て いま す 。 そこ で , 補助 記憶 装置 を 使っ て 
プロ グラ ム や 大 量 の デー タ を 保存 し ます 。 補助 
記憶 装置 と し て は , 家庭 用 に ある カセ ッ ト テ ー 
プレ コー ダ が 使え る の が 普通 で す 。 ス タ ジ オ で 
は 情報 の 出し 入れ の 時 間 を 節約 する た め に , カ 


図 1 マイ コン の 機器 構成 


中 央 処理 装置 (マイ コン の 頭脳 , CPU) 


セッ ト テ ー プ レコ ー ダ より 一 段 と 便利 な フロ ッ 
ピー ディ スク 装置 と いう も の を 使い ます 。 フロ 
ッ ピ ー デ ィ ス ク 装 置 で は , カセ ッ ト テ ー プ レコ 
eee が セツ ド を 使う まう に に プロ ウッ ウ ピー デ ャ 
スク と いう 薄い 磁気 記録 盤 を 使い ます 。 
印字 機 ( プ リン 1) 

マイ コン で 処理 し た 結果 や プロ グラ ム を 紙 の 
上 に 印字 し て 残し て お く た め に 印字 機 が 使え ま 
す 。 放送 で は あま り 使い ませ ん が , テキ スト 用 
の プロ グラ ム 作 り に は 活用 し まし た 。 


き て , マイ コン は どの よう に 使う の で じょう か 。 
マイ コン に や ら せ た いひ い 仕事 の 手順 を プロ グラ ム 
と し て 教え 込み 。 その プロ グラ ム を 実行 させ る こ 
と に よっ て 使う 、 これ が 本 来 の 使い 方 で す 。 い ろ 
いろ な プロ グラ ム を 見 た り , で きれ ば 自分 で も プ 
ログ ラム を 作っ て みて , プロ グラ ム と は 何 か を 理 
解す る こと , これ が マイ コン を 理解 する 早道 で す 。 
放送 で は , や さ し い プロ グラ ム か ら 始 め て , だ ん 
だ ん に 複雑 な プロ グラ ム に 進み ます 。 自分 で も 簡 
単 な プ ログ ラム を 作っ て ゆく こと を お すす めし ま 
す 。 自分 の プロ グラ ム が うま く 動 いた と き の 喜 び 
を ぜひ 味わっ て 下さ い 。 


フロ ッ ピ ー デ ィ ス ク 装 置 


主 記憶 装置 
3 
メモ リ 


マイ コン に 親 し も う 


念 放送 日 10 月 6 日 ( 水 ) 


コン ピュ ー タ は 。, 大 変 高価 な も の で 専門 家 が 使う も の , 
う も よく わか ら な いも の と 思わ れ が ち で し た 。 マイコン が 現れ て か ら は , 
だ れ も が 使え る も の , だ れ も が 楽し くつ き あ える も の に 
きん マイ コジ に 親 じ も う で は ほ は あり ませ ん か 。 


念 再 放送 日 10 月 10 日 (日 ) 


一 般 の 人 に は ど 


な り そ う で す 。 皆 


圏 マ イコ ン 掲 示 板 


マイ ゴン: . こ ュ リ モン : 義 
ハシ "マリ マス 


マミ サン ミ テ クタ” サイ 


と マイ コン の 表示 装置 を 掲示 板 が わり に 使い まし 
ょ う 。 家庭 で も , 学校 で も , 会 社 で も , 
ショ ッ プ で も ,。 どこ か の マイ コン を 使っ て , 番組 
の 家伝 に 一 役 買っ て 下さ い 。 


2 リグ 


圏 プ ログ ラム 

マイ コン に や ら せ た い 仕事 の 手順 を プロ グ 
ラム と し て 教え 込み 、 その プロ グラ ム を 実行 させ 
る こと に よっ て 使う 。 これ が マイ コン の 本 来 の 使 
い 方 で す 。 さ っ そく 上 の 掲示 を 行う プロ グラ ム を 
作っ て み ま し ょ う 。 

その プロ グラ バ は 表示 1 の よう に な り ま す 。 詳 
し いこ と は これ か ら だ ん だ ん 説明 し て ゆき ます が , 
表示 2 に 簡単 な 説明 を 書き 込ん で お きま し た の で 
眠 で 下さ きい 。 こ の プロ ダラ ム に は P1=1t と いう 名 
前 を 付け て お きま す 。 


較 プ ログ ラム の 打ち 込み 


プロ グラ ム を マイ コン に 教え 込む に は , キー ボ 
ー ド か ら 打 ち 込 ん で や る の が 基本 的 な 方 法 で す 。 
人 間 か ら 意 志 や 情報 を マイ コン に 伝え る の に ., 現 


在 で は キー ボー ド を 使う の が 普通 で すか ら , マイ 
コン 習得 の 一 つの "キー" は , キー ボー ド に よく 慣 
0 の と CR 

スタ ジオ で 使う キー ボー ド の キー の 配列 は 図 1 
の よう に な っ て いま す 。 キー の 配列 の わか る 大 き 
な 写真 は 164 真 の 付録 1 に あり ます 。 キー の 並べ 
方 に は ある 程度 の 規格 が あっ て , 英字 や 数 字 は 英 
文 タ イプ ライ ター と ほぼ 同じ で す 。[ 特 殊 な キー に 
つい て は , マイ コン の 機種 に よっ て 。 いろいろ と 
工夫 が 北 ら され て いま す の で , マイ コン を お 使い 
の 方 は それ ぞ れ の 機種 の 説明 書 を 良く 読ん で 下 
さい 。 配置 や 文字 の 種類 は 違っ て も 基本 的 な 働き 
を する キー は どの 機種 に も つい て いる は ず で す 。] 


表示 1 プロ グラ ム P1-1 


1 Print も マイ コン ニュ 9 モン か カ " 『 


2 print も " 八 "マリ マス " 


づ pFCin セ も 
4 PF1in 七 "ミナ サン ミ テ クタ "サイ " 


表示 2 プロ グラ ム P1-1 の 説明 
1 Print マイ コン ニュ ウ モ ン カ "「 
2 prin も " ハシ" マリ マス " 
3 PP1n セ <ーーーーーーーーー 一 改行 だ けさ せる 


4 CA の IE ミナ サン : ミア クタ 


ヒレ ーーーーーー 
行 番 せよ と 印字 さ せ た い 内 容 。 引用 符 * で 
や て あか や ーー トー 
プリ ント と 間隔 (また は 空白 ) も ー つ の 文 
読み ます 字 で す 。 


図 1 キー ボー ド 上 の キー の 配列 


/ 議 「 細 TLLLTLLL 用 
Th 理 器 財 


図 2 プロ La mi 


ICEICIIINIuuL 語 
順 〇 ひ ② ⑨④⑨⑥⑦ ③⑧ の 


mm 


遇 画 天 癌 導 


図 3 プロ グラ ム P1- -1 の 打ち 込み 手順 (つづき) 


国 罰 急 回 久 岡山 所 [SHIFT] 連 国 罰則 隔 


プロ グラ ム P1-1 の 第 1 行 の 打ち 込み 手順 を 図 
2 と 図 3 で 見 て 下さ い 。 第 2 行 も 同じ よう に 打ち 
込み ます 。 次 の こと に 注意 し て 下さ い 。 
① キ ー は 軽く 押す だ け で 十分 で す 。 キー を 打つ と 
いっ て も 強く た た く 必 要 は あり ませ ん 。 
(た た いた キー は 画面 に 表示 され ます 。 それ を 見 
て いれ ば , キー を 正しく 打っ た か どう か 確か め ら 
れ ま す 。 [SHIF〒], [ 負 , RETURN] な ど は , それ 
だ け で は 画面 に 表示 され な い 特 別 の キー で す 。 
⑧ 表 示 装 置 の 画面 に は カー ツル (印字 位置 表示 ) 
と 呼ば れる 四角 の マー ク 計 が 点 減 し て いて , 押し 
た キー の 表示 され る 場所 を 示し て いま す ( 表 示 3)。 
④ プ ログ ラム の 1 行 を 打ち 終っ た と ころ で | 暫時 
〒URN] と いう キー を 押し ます 。 (機種 に よっ て は , 
と か と いう キー を 使い ます が , 同じ 働 


表示 3 カー ソル 


1 NN 本 
四角 の マー ク が 点 減 し て いる 


次 の 印字 位置 を 示す 


き で す 。 行 の 先頭 に 戻り 改行 する と いう 意味 で す 。 
図 1 の 右端 下 の 了 岡 キー も 同じ 働き で す 。 
途中 で 打ち 間違え て も 簡単 に 修正 で きま すか ら , 


あま り 気 に する こと は あり ませ ん 。) 


圏 打ち 間違え た ら 


プロ グラ ム の 打ち 込み で , キー を 間違え て 押し 
CUEeSNSh は よく が る と (と (です 。 その 送 き (8 
次 の よう に 修正 し ます 。 詳し く は 次 回 に 説明 し ま 
すか ら , 必要 な けれ ば 飛ば し て 下さ い 。 必要 な キ 
ー を 図 4 で 見 て 下さ い 。 
① 間 違え た キー を 押し て すぐ に 気がつい た と き 。 
すなわち , カー ソル が 間違え た 字 の 次 の 位置 に あ 
り , 例え ば 

1 print 2 較 
と 引用 待 「 の か わり に 2 を 打っ て し まっ た と き ( こ れ 
は キー の 押し 忘れ で よく ある こと で す )。 


図 4 修正 に 用 いら れる 特殊 な キー ( 図 1 の 有 の ほ 3) 


中 キー を 押し (する と カー ソル が 1 宇 分 戻っ て , 
そこ に あっ た 文字 が 消え ます の で ), 正しく 打 ち 直 
し ます 。 

⑧ 何 文字 か 先 に 進ん だ り , その 行 で の 
キー を 押し て か ら 気 が つき , 画面 に その 行 が 表示 
され て いる と き 。 

カー ソル を 直し た い 場 所 に 移動 し て 打ち 直し , 
必ず キー を 押し ます 。 その と き , カ 
ー ソ ル の 右 に 残っ て いる 文字 が あっ て も 無視 され 
ませ ん 。 カー ソル の 移動 に は と 回 の キー を 使 
いま す 。 図 5 を 見 て 下さ い 。 
より 一 般 的 な 修正 方 法 は 第 2 回 で 扱い ます 。 


5 意味 
カー ソル を 上 に 人 千 
カー ソル を 右 へ っ 
を 押し な が ら 
還 カー ソル を 下 に 
[SHIFTT] を 押し な が ら カー ソル を 左 へ トコ 
図 5 カー ソル 移動 の 方 法 
圏 実行 (run) の 指令 


プロ グラ ム P1-1 の 打ち 込み が 終っ た と ころ で , 
正しく 打ち 込め た か 確認 し た 上 で , さっ そく 実行 
し て み ま し ょ う 。 実行 に は 次 の 操作 を し ます 。 
実行 を 指令 する 操作 手順 

キー ボー ド を 

[RI [UI[N| [RETURNI 
の 順に た た く 。 

この 操作 に 必要 な キー の 位置 を 図 6 で 見 て 下さ 
い 。 こ れ を run (ラジ ) 指 令 と いい ます 。 操作 の 
結果 . プロ グラ ム P1-1 が 実行 され て , 画面 に 表 
示 4 の 部 分 が 出 まし た 。 

も う 一 度 , この 操作 を や っ て み ま し ょ う 。 画面 
は 表示 5 の よう に 変わ り ま し た 。 こ れ で わか る よう 
に , プロ グラ ム は 「 一 度 教 え 込め ば 何 回 も 実行 で 
きる 」 と いう 性 質 が あり ます 。 


男 
図 6 RIUN の キー の 位置 と 順序 


表示 4 プロ グラ ム P1-1 の 結果 
un 

マイ コン ニュ ウ モ ン か カ " 
ハシ “ マリ マス 


を たび 「 ミチ クタ "サイ 
0k 


表示 5 プロ グラ ム P1-1 の 再 実 行 


いり n ロ 

マイ コン ニュ 9 ウ モン か カ か“ 
ハル ハシ" マリ マス 

ミナ サン ミ テ クタ “サイ 
0k 

マイ コン ニュ ウ モ ン カ ^ 
ハシ " マリ マス 


ミネ だ りさ デ クタ サイ 
[Ok|-ーーーーーーーーーーーー 次 の 指令 を どう ぞ 


画面 (表示 5 ) の 最後 の 行 に Ok と 表示 され て 
いま すね 。 これ は マイ コン 側 の 仕事 が 一 区 切り つ 
いて , 人 間 の 方 に 「 次 の 指示 を どう ぞ 」 と いっ て 
いる の で す 。 逆 に これ まで 使っ て きた 
キー が 人 間 の 方 か ら マ イコ ン に 指令 や 指示 が 終っ 
た こと を 示 じ て いる の で す 。 


どう" 
RETURN ん 


田 掲 示 な はずす 


掲示 は 必要 で な く な っ た と き に は , と り は ず し 
て お か な いと 迷惑 に な り ま す 。 掲示 を と り は ず す 
よう に , 画面 を 全部 消し て し まう こと が で きま す 。 
ここ で は Ok の 表示 が 出 て いる 状態 で 、 キ ー ボ ー ド 
の 操作 で 画面 を 消す 方 法 を 示し て お きま し ょ う 。 


\ 


この 章 で 出 て きた こと を 何 か ら 何 ま で 100 パー 
セン ト 理 解 し よう と 考え な いで 下さ い 。 これ か ら 
も 繰り 返し 説明 する つも り で す 。 今 回 の ポイ ント 
を まとめ て お きま す 。 
プロ グラ ぬ 

プロ グラ ム は 仕事 の 処理 手順 や 情報 の や り と り 
を 記述 し た も の で す 。 プ ログ ラム な し に は マイ コ 
ン は 何 の 働き もち し ませ ん 。 


画面 消去 の 操作 (Ok ガ 表 示さ れ て いる と き ) 
キー ボー ド の 
較 キー 
を 押す 。 
この あと , も う 一 度 run 指令 を 実行 し て みて 下 
さい 。 き れい に 表示 され る で し ょ う 。 


ン 


プロ グラ ム の 打ち 込み 

プロ グラ ム を マイ コン に 教え 込む の に は キー ボ 
ー ド の キー を た た いて ゆく 方 法 が 基本 で す 。 第 5 
回 で 別 の 方 法 を 紹介 し ます 。 
プロ グラ ム の 実行 

run 指令 を 使い ます 。[RI [UI[N] [RETURN] の 順に 
キー を た た きま す 。 


ーー で = と あま ーー ーー 


① 次 の プロ グラ ム を キー ボー ド か ら 打 ち 込 む 練 
習 を し て 下さ い 。 


1 print "1982-10-07“ 
2 print "サイ ホウ ゾウ カ " アリ マス “ 


⑫ 上 の プロ グラ ラム を 打ち 送 ん だ ら 。 キ 呈 ボ こ エド R 
か ら , KRIUI[N] [RETURN] の 順に キー を 押し て , 
実行 し て みて 下さ い 。 

〈⑬③ キー ボー ド 上 の カナ の 位置 を 交 の よう な こと 
を や っ て 覚え て 下さ い ( 付 録 に 写真 が あり ます )。 


・ ア イ ウ エ オ や カキ ク ケ コ の 50 音 順に キー の 位置 

を 探し て 下 の 図 に 書き 込ん で 下さ い 。 

・ 自 分 の 名 前 を カナ で 打つ た め の キ ー の 位置 を 探 . 

し て 下さ い 。 

(〈④ この テキ スト で 使わ れる 主 な 英語 の 単語 は 付 
録 に まとめ て あり ます 。run と print の 項 を 調べ 
て 下さ い 。 


キー ボー ド 白 紙 図 


図案 を 楽し む 


念 放 送 日 10 月 13 日 ( 水 ) 欠 再 放送 日 10 月 17 日 (日 ) 


マイ コン で 図形 や グラ フ を 画面 に 表示 する こと は 楽し いこ と で す 。 こ の 
講座 で は 図形 や グラ フ を いろ いろ と 取り 扱い ます が , その 第 一 歩 と し て , 
ンズ 動物 の 図案 で 遊び まし ょ う 。 目 や 鼻 を 少し 整形 手術 する だ け で 。 ず いぶ ん 
と 違っ た 印象 を 楽し め ま す 。 


表示 3 ね ずみ 


同 図 案 の い ろ い ろ 


単純 な プロ グラ ム で , 動物 や 人 の 上 顔 を 表示 装置 

の 画面 に 出し て み ま し た 。 表示 1 一 5 を 見 て 下さ 
い 。 来年 は いのしし 年 で す 。 表示 5 は 懇 の よう に 
も 見 えま す が , いのしし は 豚 の 親戚 で すか ら , が ま 
ん し て 下さ い 。 


表示 1 か える 


| 区 | 
※※ デ 区 ※※ デ メデ 


※※※※※※※※※※※※※※ デ ※ め 
※※※※ ※※※※ 
※※※ ※※※ 
※※※ ※※※ 
※※ ※※ 
本 0 
※※ X X ※※ 
し 0 B 
0 0 
00 00 
"Tooooooo" 
クス 


較 プ ログ ラム の 表示 


プロ グラ ム が マイ コン に 教え 込ん で ある と き , 


それ を 実行 させ る に は run 指 令 を 使い 、 還 UI 人 
の 順に キー を た た く の で し た ね 。 その 
プロ グラ ム を 画面 に 表示 する に は 次 の よう に し ま 
す 。 
プロ グラ ム の 表示 を 指令 する 手順 

キー ボー ド の キー を 

[LIU]【S) 還 [RETURN 
の 順に た た く 。 


この 操作 に 必要 な キー の 位置 を 図 1 で 見 て 下さ 
い 。 こ の 指令 を HSt( リ スト ) 指令 と いい ます 。 操 
作 の 結果 は 表示 6 の よう に な り ま す 。 
よく 使う の で 覚え て 下さ い 。 


Em 


この 指令 は 


LILI 
LLII 


図 1 本 [ETURN] の 位置 と 順序 


list 指令 を 行っ て も プロ グラ ム は 消え た り し ませ 
ん 。 何 回 繰り 返し て list を 指令 し て も か まい ませ ん 。 
た めし に 繰り 返し て み ま し ょ う 。 その と き , 表示 


表示 6 list 指 令 で 出し た プロ グラ ム P 2-1 


画面 の 下 の 方 まで 文字 が 出 て いっ ぱい に な る と , 
巻物 (スク ロー ル ) の よう に , 画面 の 上 へ ヘ 上 へ 
ずれ な が ら , 表示 が 続け られ ます 。 上 の 方 は 消え 


て ゆき ます が , 下 の 方 に は いく ら で も 続け られ ま 
by: 
較 プ ログ ラム を 読も う 


表示 6 の プロ グラ ム を 読ん で み ま し ょ う 。 も う 
一 度 次 頁 に プロ グラ ム だ け を 示し ます (表示 7 )。 
プロ グラ ム は 放 の 集まり に な っ て いま す 。 この 
プロ グラ ム の 行 に は 10 番 お き の 番 号 が 付け られ て 
いま す 。 行 は その 番号 の 小さ いも の か ら 順 に 並ん 
で いま す 。 10 番 お き に し て ある の は あと で 新しい 
行 を 間 に 入 れ て プロ グラ ム を 修正 で きる よう に す 
る た めで す 。 プ ログ ラム を run 指 令 で 実行 する と 行 
の 番号 の 小さ い 順 に 実行 され る の が 原則 で す 。 

行 は 番号 で は じ ま り , その あと 朗 と 呼ば れる 
も の が 続き ます 。 文 に は いろ いろ 種類 が あり ます 。 
ここ で は 。, 文 の 先頭 に 製 製 疫 量 (プリ ント ). と いう 
単語 が き て いま す 。 こ の よう な 単語 は 機能 語 ( キ 
ー ワ ー ド ) と 呼ば れ , 文 の 種類 を が し ます 。 
print 文 
・ プ リン 下 世 呼び ます 。 

画面 に 文字 な ど を 印字 する の に 用 いま す 。 


10 PRINT “ ※※※ ※※※ 0 
20 PRINT ※ ※ ※ 3 
30 PRINT X※ @ ※ ※ @ ※ 
40 PRINT ※ ※※※※※※ ※ 
50 PRINT ※ ※ 
60 PRINT ※ ※ 5 
0 符 科 ENE。 、 2 凌 3 
80 PRINT " ※ 2 
90 PRINT " ※ 。  。 ーーーーーー ん 0 
100 PRINT ※ ※ 
110 PRINT ※ ※ 
120 PRINT ※※※※※※※※※※※※ デ ※ 『 
0k 


意 
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表示 7 プロ グラ ム P 2-2 の 説明 


PRINT " ※※ デ ※ ※※ デ ※ 


2 PRTNT 3 3 ※ ※ hn 
30 PRINT ※ Q ※ ※ Q ※ 
:40 PRINT ※ ※※※※※ デ ※ ※ 
50: PRINHT ※ ※ 
60 PRINT 3 ※ W 
の 0 DPRHNIE で TE 先 X※ 。 "* 
80 PRINT テ ※ Sp 
20 PRINT リ 甘 ーーーーー 一 3 則 
4200 PRTNT ※ 人 
110 PRINT ※ ※ ロ 
120 PRINT ※※※※※※※※※※※※※※ 1 
に ーーー ニー 
印字 を せよ 引用 符 で くく っ て , 印字 し た い 交 字 や 


と いう 命令 記号 の 列 を 書い て いる 


空白 は 見 や すく する た め に 入れ て いま す ( 二 つ の 引用 符 の 中 の 空白 は ーー つ の 文字 と し て 必要 で す ) 


・ こ れ か ら , いろ いろ な 使い 方 が で て きま す 。 園 国 園 圏 国 
print 文 の 使用 例 Le ドド kN 
Llell 


・PRINT "ABCDEFG" 引用 符 で くく っ た 文字 [| EK 選 Mel lk] 
の 列 に は 好き な 文字 を 使え ます 。 7 が し し 


ヲ 


3 
・PRINT これ だ け の と き は , 改行 だ け せ よ と い 図 2 [SHIFT] キー な ど 使 わ ず に た だ 押す だ け で 使え 
る キー, 英字 は 小娘 字 が 打ち 込ま れる 


う 命 令 に な り ま す 。 
表示 2 か ら 5 の よう な 図案 の プロ グラ ム は 付録 
に あり ます の で 読ん で みて 下さ い 


較 文 字 の 種類 
図 3 [SHIFT) キー を 押し な が ら 使 特殊 記号 の キー 
キー ボー ド か ら 打ち 込ん で 画面 に 表示 で きる 文 キー を 押し な が ら 英 字 を 押す と 大 文字 


が 打ち 込ま れる 
に は た くさ ん の 種類 が あり ます 。 一 つの キー を 


[SHIFT] と 区 キ ー の 組み 合わ せ や 了 キー の 使用 
で 何と お り に も 使え ます 。 マイ コン の 機種 に より 
いろ いろ な 工夫 が 凝ら され て いる の で , 使用 で き 
きる 字 種 に 多少 の 違い が あり ます 。 少な く と も 英 


図 4 錠 キ ー を 押し て か ら ( 固 定 さ れる ), 使う カナ 文字 


字 (大 文字 と 小文字 )、 数 字 , 三 や * ま な どの 特殊 記 は 濁点 , 半 濁 点 , | は 横 棒 の 記号 

号 が 使え , カナ 文字 や グラ フィ ッ ク 文 字 が 使え る [[ 居 本 細 呈 司 還 国語 LT 

こと も 普通 に な っ て いま す 。 スタ ジオ の キー ボー ーー 時 ユー ユーー | 時 還 3 昌 

ド の 字 種 を 打ち 方 で 分 け て 図 2 一 6 に 示し て あり ーー 叶 馬 | | | | 贈 憶 

ます 。 ee し PEH 
な お , 表示 7 で PRINT は 大 文字 に な っ て いま 図 s Ts 1 

す 。 プ ログラム の 打ち 込み の と き は print と 小 文 使う カナ 廊 字 , アイ ウェ オヤ ュ ョ ッ は 小文字 


12 


図 6 隔 キー を 押し な が ら 使う グラ フィ ッ ク 文 字 


字 で 打っ て も , lst 指令 を 実行 する と 表示 で は 大 
文字 に な り ま す 。 引用 符 で くく られ た 文字 列 な ど , 
大 文字 と 小文字 の 区 別 が 必要 な 場合 は 打ち 込ん だ 
と き の ま ま 表 示さ れ ま す 1。 


田 表 示 画 面 


画面 に 表示 で きる 文字 数 は , 横 40 字 。 縦 20 行 が 
標準 に な っ て いま す (機種 に よっ て 異な る こと が 
あり ます の で 注意 し て 下さ い )。 この 40 メ 20 の 大 き 
さ を, 40X25 と か 80X20 や 80X25 に 変え る こと も 
で きま す 。 グラ フィ ッ ク 文 字 を 使っ て 図案 を 表示 
する と き は 40 字 ( 横 )X25 行 ( 縦 ) が 便利 で す 。 こ の 
た め に は 次 の 命令 を 使い ます 。 
width 文 「 


・width は 幅 と か 広 さ と いう 意味 で す 。 ウ ィ ド ス 
と 読み ます 。 

・width 40, 25 

と すれ ば , 画面 の 表示 を 横 40 字 , 縦 25 字 と する 
指定 で す 。 こ の ほか , 80X20, 80X25, さら に 
横 を 72 や 36 字 に で きま す 。 


較 較 案 の 作 り 方 


図案 を 考え る と き は 市 販 の 5mm 方 眼 紙 な ど を 
使う と 便利 で す 。 編物 で 目 数 や 段数 を 数 える よう 
に 横 の 字数 や 縦 の 行 数 を 数 え や すい よう に 図 7 の 
よう な 方 眼 紙 を 使う の も よい で し ょ う 。 つ いで に , 
print と 引用 待 を いれ て お きま し た 。 


友 問 側 居 剛志 構 杉 天 融 際 圏 玩 学 
LTLHETTIIIHTITITITITTITTI 
ドド CE に EK 本 
角 丁 黄 馬 況 瘍 田 医 弄 陶 SB 玩 足 軍 
ェ ャ ーー St(<)W さ 


図 7 図案 の 作り 方 


時 電電 


ヨ 当 X) 向 は を 


† list を と っ た と き , 大 文字 に 変わ る の は , print の よう な キー ワー ド と 変数 の 名 前 で す 。 


機種 に よっ て width 文 は 使え な いこ と が あり ます 。 使 っ て いる 画面 の 大 き さ が 変更 で きる な ら そ の 方 法 を 調 


べ て 下さ い 。 
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圏 プ ログ ラム の 修正 


プロ グラ ム の 一 部 を 修正 し た い , 顔 の 図案 で い 
えば 整形 手術 を し た いこ と が ある で し ょ う 。 プロ 
グラ ム 打 ち 込 み 途 中 の 間違い の 訂正 方 法 を 第 1 回 
で 説明 し まし た 。 その と き , カー ソル の 移動 を 利 
用 し まし た が , [ 肝 キー は 上 に , 国 キー は 右 へ , 
と 合わ せ 使 うと それ ぞ れ 下 に と 左 へ と に 
カー ソル を 移動 で きま す 。 

行 中 の 文字 の 削除 

・ カ ー ソ ル を 削除 し た い 文 字 の 右 ど な り に 移動 し 

て , 喘 キ ー を 押し ます 。 左 に 続い た 文字 を 次 々 

は 消す こと が で きま す 。 

・ キー を , 削除 を 行っ た プロ グラ ム の 

行 ご と に 打ち ます 。 

行 中 へ の 挿入 

・ 挿 入 し た い 位 置 ま で カー ソル を 移動 し ,[SHIFT] 

キー を 押し な が ら 園 ] キ ー を 必要 な 文字 分 だ けた 

た きま す 。 それ で 空白 が で きる の で そこ に 挿入 

し た い 文字 列 を 打ち 込み ます 。 

こ キー を , 挿入 を 行っ た プロ グラ ム の 

行 ど と に 打ち ます 。 

行 中 で の 文字 列 の と り ガ え 


ー 


カー ソル を と りか えた いも と の 文字 列 の 先頭 に 
移動 し て , 打ち 込み ます 。 字数 が も と と 合わ な い 
と き は 削除 や 挿入 の 手順 を 用 いま す 。 
・[RETURN|」 キー を と りか え を 行っ た プロ グラ ム 
の 行 ご と に 打ち ます 。 

以上 の 操作 は や っ て みれ ば すぐ わか る こと な の 
で , いろ いろ と や っ て みて 下さ い 。 [ETURN] キ 
ー を 打ち 忘れ る と 修正 が 有効 に な ら な い の で 注意 
し て 下さ い 。 修正 後 は も う 一 度 , list を 指令 し て 
確認 し まし ょ う 。 


圏 プ ログ ラム を 消す 指令 


ー つ の プロ グラ ム を run 指 令 で 実行 させ た り , 
list 指 令 で 表示 し た り し て , 次 に 別 の プロ グラ ム を 
打ち 込み た いと き は , も と の プロ グラ ム を 次 の よ 
つば で 消 層 まず 。 
プロ グラ ム を 消す 手順 

キー を 

IN][E] WIIRETURNJ] 
2 だ 7 さく 3。 
この 指令 を mew 指 令 と いい ます 。new は 新しい 
と いう 意味 で 。 これ か ら 新 し い プ ログ ラム を 入れ 
まし ょ うと いう 気持 で す 。 


プロ グラ ム の 修正 は [に ][ : ] ゃ [ 詩 ] を 使う 


修正 後 [RETURN] を 忘れ な いよ うに 


ーーーーー 一 + 深 イシ トー ーーーーーーー 


ここ で は , 図案 を 楽し ん で いた だ く の が ポイ ン 
KSCSd7e 
① 画 面 で の 図案 作り 

イラ スト の 上 手 な 人 々 は print "の 繰り 返し の プ 
ログ ラム を 表示 8 の よう に 画面 に 出し , 画面 を キ 
ャ ン バ ス の よう に 使っ て 図案 を 作っ て ゆき ます 。 
消し ゴム 不要 と いう わけ で す 。 
② 指 令 と プロ グラ ム の 文 


表示 8 


画面 を キャ ン バ ス に 


これ まで run 指 令 ( 実 行 ), hst 指 令 ( 表 示 ), new 
指令 (プロ グラ ム を 消す ) の 三 つ の 指令 を 使い ま 
し た 。 一 方 , print や width と いっ た 命令 は プロ グ 
ラム の 中 で 使え ます 。 その 使い 分 け に 注意 し て 下 
さい 。 
プロ グラ ム の 修正 

ー つ の プロ グラ ム を 自分 の 好み に 合う よう に い 
ろ い ろ に 修正 し て 使う こと が で きま す 。 


ゃ っ て みよ ラ 


① プロ グラ ム P2-1 な ど を 打ち 込ん で , 好き な よ 
うに 修正 し て みて 下さ い 。 

⑧④ 好き な 図案 を 作っ て みて 下さ い 。 付録 の プロ 
グラ ム を 参考 に し て 下さ い 。 

③ 次 の print 文中 の 文字 列 に 一 つの (名 読 ) 点 を 
挿入 し て 下さ い 。 


10 pFrint "キミ ルル シラ ナイ ノ テ “スカ” 
20 Print 七 "ココ カラ 八 キ モノ ラ ヌ イ テ " クタ " サイ“ 
30 pr1int "ツマ テ "` キタ カネ オク レ " 


④ クイ ズ 。 次 の 鳥 は どの グラ フィ ッ ク 文 字 で 作 
れる で し ょ う 。width 40, 25 と し て 画面 を 使っ 
て 下さ い 。 
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対話 の すす め 


念 放送 日 10 月 20 日 ( 水 ) 欠 再 放送 日 10 月 24 日 (日 ) 


マイ コン に 仕事 を させ て いる 途中 で , 必要 な 情報 を キー ボー ド か ら 与 え 
た り , 途中 の 結果 を 人 間 が 見 て その 先 の 仕事 を 指示 し た りす る こと が で き 
ます 。 そ る の よう な と き は マイ コン と 話 を し て いる 気持 に な り ま す 。 今回 は 
マイ コン と の お し ゃ べり を 楽し み ま し ょ う 。 シ ナリ オ 作 りか ら は じ め ま す 。 


す 。 そ の 右 の N$ は 入力 され た 情報 の 入っ て ゆく 


一 シナ リオ 場所 を 示し て いま す 。 行 40 の input 文 で マイ コン は 
マイ コン  「 僕 は マイ コン で す 。 名 前 は まだ あり 人 間 の 付け て くれ る 愛称 を 受け と っ て 記憶 し ます 。 
ませ ん 。 名 前 を つけ て ね 」 行 70 で は キミ の 名 前 を K$ に 受け と り ま す 。 
KS TE サブ で どう だ い 。 」 識 交 数 
マイ コン  「 僕 を サブ と 呼ん で ね 。 君 の 名 前 は 」 
[ek も の タデ 莉 記憶 場所 の 名 前 は 変数 と 呼ば れ ま す 。 そ れ は , 
2 、 すま どど 著 補 すず 和 ぬ 。 よろ じ く 」 その 記憶 内 容 一 一 値 と いう こと が あり ます 一 一 
お し ゃ べり プロ グラ ム が , プロ グラ ム の 進行 に つれ て 変わ る こと が ある 
か ら で す 。 
プロ グラ ム は 表示 1 の よう に な り ま し た 。 記憶 内 容 と し て 文字 の 列 を 入れ た い 変 数 の 名 前 


新しく 出 て きた 機能 語 は 行 40 と 70 で の INPUT( イ は 


ンプ ブッ ト ) だ け で す 。 に ーーーーーーーーーーー- ( 
bw 


1 半生 
還 の よう に , 英字 の あと に ドル 記号 を 付け ます 。 


マイ コン に 外 か ら 情 報 を 入れ る こと , お よび そ 5 と か 3.14 の よう な 数 値 を 入れ た い 変 数 は 


の 内 容 を 入力 (input) と いい ます 。 PO 
3 英字 i( 例 ) B, C 
行 40 の よう に INPUT で 始ま る 文 は 入力 の 命令 で 


表示 1 プロ グラ ム P3-1 


"ホッ ク 八 マイ コン " 

"ナマ エ 八 マタ *" アリ マセ ン " 
"ナマ エ ラウ ツケ テ ネ " 

N ま 

N ま も 』" ト ヨン テ " ネ " 


"キミ ノ ナマ エ 八 " 
K ま も 
っ 名 生ま グッ テー ズ スネ 
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: 例 XX1C2 ! 


の 形 に し て 名 前 を 付け ます 。 そ の 使用 例 は 次 回 に 
則 ま ( 枯 。 

変数 の 名 前 は 記憶 内 容 や その 使い 方 を 考え て , 
覚え や すい よう に 付け ます 。 N$ は マイ コン に 「『 
ナマ エ " を 付け て も ら う の で N と し て あり ます 。 


較 プ ログ ラム の 実行 例 

表示 2 に プロ グラ ム P3-1 の 実行 例 を 示し ます 。 
まこ と 君 は マイ コン に サブ と いう 名 前 を 付け まし 
た 。 ま こと 君 の 答え 方 は 少し ぶっ きら ぼう か な 。 


皆さん も 同じ いよ うな シナ リオ で プロ グラ ム を 作 
っ て みて 下さ い 。 


表示 2 プロ グラ ム P3-1 の 結果 


Fn 

ホク 敗 マイ コン 

ナマ エ 八 マタ " アリ マセ ン 
INPUT 女 を 実行 する 

7 9 バーーーー。 2 

か ら 入 力 す る 

夫人 

? マコ ト 0 

キミ 八 マコ ト クン テ " ス ネ 

0k 


記 憶 装 置 


3 と 誠二 に た (けど wiia4E ど 3 


1 print 文 の 働き 


較 input 文 の 働き 


マイ コン が input 文 を 実行 する と ? が 印字 され ま 
す 。 表 示 2 の 5 行 目 と 8 行 目 を 見 て 下さ い 。 ? の 
あと , キー ボー ド か ら 人 間 が 入力 し ます 。 ? の あ 
る 行 が まこ と 君 の し ゃ べ っ た 部 分 と いう 感じ で す 。 


圏 print 文 の 働き 


プロ グラ ム P3-1( 表 示 1 ) の 行 50 を 見 て 下さ い 。 
50 PRINT N$ 』" ト 
と な っ て いま す 。 こ れ は , N$ の 記憶 内 容 と それ 
に 522 トー ヨン テツ と いう 英 深 別 守 
印 学 せよ と いう 命令 で す 。 こ の よう に , print 文 で は 
右 に 変数 の 名 前 を 並べ て その 内 容 を 印字 させ る こ 
と が で きま す ( 図 1)。 プロ グラ ム P3-1 の 行 80 も 
同じ よう な こと で す 。 print 文 の 右 の 並び の 区 切り 
に (セミコロン) の 記号 が 使っ て ある こと に 注 
意 し て 下さ い 。 な お , 空白 も 一 つの 文字 で す 。 


ヨン テ ヾ ネリ "『 


較 プ ログ ラム の 改良 


この シナ リオ の プロ グラ ム で は , 行 20, 30, そ 
れ に 行 60 で ナマ エ と いう 文字 列 が 3 回 も 出 て きま 
すね 。 こ の よう に 何 回 も 使う 文字 列 は ある 変数 に , 
た と えば AS に , あら か じ め 記 憶 さ せ て お いて , 
必要 な と ころ で 使う こと が で きま す 。 そ うす る よ 
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表示 3 プロ グラ ム P3-2 


| 5 LET A*=" ナ マエ" | 
10 P 


RINT "ホク 八 マイ コン ” 


20 PRINT A ま 』” 八 マタ " アリ マセ ン ”" 
30 PRINT A ま も 』′ ヲ ツケ テ ネ " 

40 INPUT N ま 

50 PRINT N ま も 』" ト ヨン テ * ネ " 

60 PRINT "キミ ノリ ja | AA" 


0 INPUT K ま 
80 PRINT 


うに プロ グラ ム P3-1 を 改良 し た の が 表示 3 の プロ 
グラ が P3-2 で す 。 

行 5 を 新しく 追加 し , 行 20, 30 と 60 を 直し て あ 
り ま す 。 実行 の 結果 は プロ グラ ム P3-1 の 表示 2 と 
変わ り ま せん 。 


国 !et 文 の 働き 


行 5 の よう に LET( レ ッ ト ) か ら 始 まる 文 を et 支 
と いい ます 。 

つ LET AA ま =" ナ マエ“ 
の 例 で は ,A$ と 名 付け た 記憶 場所 に = の 記号 (等 
号 , イコ ー ル ) の 右側 で きま る 値 一 一 記憶 すべ き 
内 容 一 一 が 覚え られ ます 。let は 「 一 させ よ 」 と い 
う 意 味 の 英 語 で す 。A$ に = の 右 の 値 を 代入 せよ と 
いう 意味 で , let 文 を 代入 支 と も いい ます t 


圏 新しい 行 


プロ グラ ム P3-2 を 改め て キー ボー ド か ら 打 ち 直 さ 
な く て も , P3-1 の list を 画面 に 出し て それ を 修正 す 
れ ば よい で し ょ う 。 新しい 行 5 は Ok の あと に 

5 LET A ま =" ナ マエ " [RETURNI 
と 打ち ます 。 

な お , 行 20,30,60 の 修正 は 前 回 説明 し た 方 法 で 
行い ます 。 行 20 と 30 は カー ソル を "ナマ エ の 引用 
符 "の と ころ へ 移動 し A$ :" と 打ち 込み 


の 追加 


"キミ 八 "5K ま ? "クン テ " ス ネ " 


RETURN] キー を 押し ます 。 ち ょ うど 同じ 文字 数 
の と りか え に な っ て いま す 。 行 60 は ナマ エ と いう 
3 字 分 を 


265 7 
と いう 6 文字 に 変え ます の で , た と えば 次 の よう 
に し ます 。 
① 行 66 の ナマ エ の ナ の と ころ に カー ソル を 移動 す 
の 


② [SHIFT) キー を 押し な が ら 園 キー 
7 だ 9 

⑧③ 円 避 向 日 円 を 必要 な と ころ で [SHIF〒 
キー を 使い な が ら 打 ち 込 む 。 [SHIFT 

皿 と 国 で 必要 で す 。 な お , 因 は 画 [ 面 に 小文字 が 
表示 され て も か まい ませ ん 。 あ と で lst 指令 を 行う 


を 3 回 た 


と 大 文字 の A に 変り ます (確認 の た め に や っ て み 
て 下さ い )。 
LET A$=" ナ マエ " 


LET 文 は 代入 文 


+ た いて い の マ イコ ン で LET 文 の LET は 省略 し て 
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5 AS 三 "ナマ エ " と し で よい よう に な っ て いま す 。 


較 女 性 版 シ ナリ オ 


ボク を ワタ シ , キミ を アナ タ に 変え た プロ グラ 
ム P3-3 を 示し て お きま す の で (表示 4 ) , プ ログ 
ラム P3-2 を 修正 し て 実行 し て みて 下さ い 。 


表示 4 プロ グラ ム P3-3 


5 LET A$ ま =”" ナ マエ" 

人 RR NN 盾 7 ワタシ AA マイ コッ 

20 PRINT A ま 』" 八 マタ " アリ マセ ン “ 
30 PRINT A ま も 』 ヲ ツリ テ ネ " 

40 INPUT N$ 

50 PRINT N も 』" ト ヨン テ " ネ " 

60 PRINT "アナ タ ノ 3A ま 8) A デ 
70 INPUT K ま ま 


る 80. や PRINT "アナ タ ハ 「j)K 事 9 お 


また , プロ グラ ム P3-2 と P3-3 の 行 5 の 右辺 を 
ョ アタ ドナ" 
と 変え て みる と お も し る いぬ で し ょ う 。 プロ グラ ム 
P3-4 と その 実行 結果 を 見 て 下さ い (表示 5 と 6 )。 
行 5 を 追加 し た お か げ で , この よう な 修正 が 簡単 
(SG きま がら 


MONO SN 


表示 5 プロ グラ ム P3-4 


5 LET Ab=" ア ァ アタ" ナ " 

10 PRINT " ホ " ク 八 マイ コン " 

20 PRINT A ま 』”" 八 マタ " アリ マセ ン ” 
30 PRINT A ま 』" ヲ ラ ツケ テ ネ " 

40 INPUT N$ も 

50 PRINT N ま $』′ ト ヨン テ " ネ " 

60 PRINT "キミ ノーj 人 AA| 
70 INPUT K ま 


① 変 数 と 記憶 内 容 

記憶 装置 を タン ス の 引き 出し の よう に 区 分 けし 
て , 文字 列 を 記憶 さき させ る こと が で きま す 。 N$ や 
AS の 変数 は 記憶 装置 の 引き 出し が 自動 的 に 割り 
当て られ ます 。 今回 は 変数 に 記憶 させ る 方 法 と し 
て , input 文 と et 支 を 使い まし た 。 タ ンス に し 
まっ た 物 は 外 に 出せ ば , 引き 出し の 中 は 空 に な り 
ます が , 記憶 装置 の 引き 出し は 空 に な ら ず , 何 回 
で も 使え ます 。 そ の か わり , 別 の 文字 列 を し まう 
と , も と の 記憶 内 容 は 消え て し まい ます 。 こ れ は 


80 PRINT "キミ ハ 3K ま 5 クン テ " ス ネ 「 


表示 6 プロ グラ ム P3-4 の 結果 


Fun 

ホ * ク 八 マイ コン 

の ドナ AT チリ マセ ルン 
シル 信人 9 称し レル 

0 が Ner か ン 


リブ プチ メッ (ツウ ず 

ーッ プ 肖 ます 。 
人 

し oo スジ て 
0k 


物質 を し まう こと と 情報 を 記憶 する こと と の 重要 
な 相違 で す 。 

ー つ の 変数 に 何 文字 まで 記憶 で きる か は マイ コ 
ン の 機種 に よっ て も 違い ます が , スタ ジオ で 使う 
マイ コン は 255 文 字 ま で で すれ は 一 つの 紅き : 出 
し の 大 き さ で す が , 文字 用 の タン ス 全 体 の 大 き さ 
に も 別 の 制限 が ある の が 普通 で す 。 

な お プロ グラ ム そ の も の も 記憶 装置 の 別 の と こ 
ろ に 記憶 され て いま す 。 
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ーーー ーー ーーezzat 和 ーー ーー 


⑱⑪ プロ グラ ム P83-5 の 行 5 の "アタ * ナ " を "アイ シ 
ョ ウ ” や ニックネーム" に 変え て 実行 し て み 
て 下さ い 。 

② 次 の プロ グラ ム を 打ち 込ん で , 実行 し て みて 
下さ い 。 


10 INPUT ム $ 

20 PRINT A ま 』 "anai" 
30 PRINT A ま : "imasu" 
40 PRINT A ま 』"u" 

50 PRINT A ま "eba" 
60 PRINT A ま :"o" 


3 と "で: 
? ak 
? kak 
7? sak 


? tak 


? の あと に , 


? nak 
な ど を 試し て みて 下さ い 。 語尾 変化 が わか り ま 
すね 。 も ちろ ん , ロー マ 字 と し て 読み ます 。 実 
行 結 果 は 表示 7 の よう に な る で し ょ う 。 

⑧ こん ど は , の プロ グラ ム を 次 の よう に 修正 
じじ で: ド さ ぎ さゆ 。 


10 INPUT 人 A$ 

20 PRINT A ま $』 "akanai" 
30 PRINT A ま :』 "akimasu" 
40 PRINT Ab』 aku" 

50 PRINT A ま 』 "akeba" 
60 PRINT A ま : "ako" 


実行 し た と き の 入 力 と し て 。, 
?k 


本 に 
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表示 7 


un 
? ak 


akanai 
ak 1 ma 
ヒ 1K4W 
akeba 
ako 

0k 

un 

? kak 
kakanai 
kak imasu 
kaku 
kakeba 
kako 

0k 

un 

? sak 
akanai 
8 に 1 maSu 
に た いじ 4W 
sakeba 

ら 8a に o 

0k 

un 

? ak 

モ takanai 
モ ak 1 mau 
モ aku 
takeba 
tako 

0k 

un 

? nak 
nakanai 
nak ュ imaSu 
naku 
nakeba 
nako 

0k 


OMN ON 


6. 


表示 8 
(AE 納 昌 
un 

? k 
kakanai 
kak imasu 
kaku 
kakeba 
kako 

0k 

un 

に 
=8akanai 
ak ュ imasu 
に た 1 いさ W| 
sakeba 
5ako 

Uk 

un 

2 
takanai 
ak 1 masu 
モ ak に ぃ 
takeba 

モ a に ko 

0k 

un 

ic 
nakanai 
nak 1 maSu 
naku 
nakeba 
nako 

0k 

Fun 

? h 
hakanai 
hak imasu 
haku 
hakeba 
hako 

0k 


KS 


な ど を 試し て 下さ い 。 結果 は 表示 8 の よう に な る 


あま つづ 5 


模様 の 色づけ 


信 放 送 日 10 月 27 日 ( 水 ) 


れい な も の が あり ます 。 


圏 模様 を 考え る 


色 を つけ る 前 に , 第 2 回 で 扱っ た 図案 の よう に , 
簡単 な お チュー リップ 模様 を 作っ て み ま し た 。 プロ 
グラ ム は , 下 の 表示 1 の よう に , 7 行 の PRINT 文 
で , 引用 待 で くく っ た 中 に は グラ フィ ッ ク 文 字 の 
圏 4 トペ を 使っ て いま す 。 こ れ ら の グラ フィ 
ッ ク 文 字 は 図 キ ー を 押し な が ら 打ち 込み ます 。 
以 義 の まる 9 

[| … 画 回 …4 慌 …M 

[DI … 慰 [F] … 更 


一 機能 キー 


この プロ グラ ム の print の よう に よく 使う 単語 や 
文字 は , 機能 (ファ ンク ショ ン ) キ ー と 呼ば れる も 
の を 使っ て 打ち 込む こと が で きま す 。 図 1 の キ 
ー ボ ー ド 図 の 最上 段 に [1] か ら [5 記 と いう 5 
つの キー が あり ます 。 こ れ ら を キー を 使 


表示 1 チュ ー リ ッ プ 


念 再 放送 日 10 月 31 日 (日 ) 


自分 で デザ イン し た 模様 を 編み 込ん だ セー ター を 作れ た ら , 楽し いこ と で 
し ょ う ね 。 編物 を は じ め , クロ スス テッ チ な どの 刺し ゅ う の 模 様 に も 大 変 き 
今回 は 簡単 な 模様 に 色 を つけ て み ま し ょ う 1。 


う 場 合 と 使わ な い 場 合 で 10 と お り に 使え ます 。 普 
通 は 画面 の いち ば ん 下 の 行 に , 機能 キー に 登録 し 
て ある 文字 列 (の 先頭 の 6 文字 まで ) が 字幕 の よ 


うに 表示 され て いま す 。 キー を 押す と , 
[SHIFT] キー を 使っ た 場合 の 機能 キー の 登録 文 


字 列 が 表示 され ます 。 表示 2 と 3 を 見 て 下さ い 。 
さしあたっ て 使用 する 機能 キー は 次 の も の で す 。 
lst ms 加山 加 国 剛 賠 に 相当 
| 
[ 相 | runcR ト … 慌 (UI [NN [RETURN] に 相当 
print ト … 合 固 員 N] 画 賠 に 相当 
エエ エエ 舞 
FTTTT 


TTF 園 刀 計 翌 
| ョ TT 還 [人 


図 1 」 HE [SHIFT] と 組み 合わ せ て 10 と お り に 使え る 


お 色 つ き ' の か カラー) 
ai た 


表示 が で きる か どう か は 表示 装置 に より ます 。 機種 に よっ て 命令 の 出し 方 も 異な り ま す 。 
マイ コン で 色 を 楽し め る こと を 見 て 下さ い 。 
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表示 2 
標準 の 機能 キー 
画面 の 下 に 字幕 


の よう に 表示 さ 
れ て いま す 。 


に 


losmllkalumilorksl 


5 


表示 3 一 8 
標準 の 機能 キー 


((SHIFT キー と 
いっ し ょ に 使う も の ) 


機能 キー は 使い 慣れ る と 便利 な も の で すか ら , 
だ ん だ ん と 使っ て みる と よい で し ょ う 。 (機種 に 
よっ て 機能 キー の 有無 , 個数 標準 登録 文字 列 に 
相違 が あり ます の で 注意 し て 下さ い 。 機能 キー が 
な く て も キー ボー ド か ら 1 字 ず つ 打 ち 込 め ば よ い 
の の: です ) 


較 色 を つけ る プロ グラ ム 


チュ ー リ ッ プ 模様 の 花 と 葉 を 色分け する プロ グ 
ラム が 表示 4 の プロ グラ ム P4-1 で す 。 実 行 の 結果 
の カラ ー 表 示例 は 82 頁 に あり ます 。 こういう 模 様 
は 小さ い 子 供 で も 楽し め ま す ね 。 プ ログ ラム を 何 
回 も 実行 し て いろ いろ な 色 の 具合 を た めし て 下さ 
い 。 
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本 プロ グラ ム の 説明 


行 10 の console( コ ン ソ ー ル ) 文 , 行 60 と 125 の 
color( カ ラー) 文 の 二 つ は 新しく 出 て きた 文 で す 。 
あと で 詳し く 説 明 し ます 。 

行 10 の console 文 は 色 つ き (カラ ー) 表 示 を 行う 
準備 で す 。 

行 20 の width 文 は 画面 を 40 字 25 行 で 使う と い 
う 命 令 で す 。 普通 は 40 字 X20 行 で 使っ て いま す 。 

行 30 と 40 は 色 待 号 を 説明 し て いる print 文 で す 。 

行 50 の input は 

アン 4 
と 印字 し て , 花 と 葉 の 部 分 に 使う 色 の 待 号 を キー 
ボー ド か ら 入 力 す る こと を 要求 し ます 。C と D に 
色 待 号 の 値 が 記憶 され ます 。 (キー ボー ド か ら は 


表示 4 プロ グラ ム P4-1 色 つ き 模 様 


10 CONSOLE 0,25,0,1 
20 MIDTH 40,25 


30 PRINT "1( ア オ ) 2( ア カ ) 3( ム ラサ キ ) 4( ミ ト " リ )“ 
40 PRINT "5( ミ ス * イ ロ ) 6( キ イロ ) 7( る ラロ )“ 


50 INPUT "イロ フ コ “9 ラ 29"5C,B 
60 COLOR C 
100 PRINT “ 
110 PRINT 
120 PRINT “ 
_125 COLOR 

130 PRINT "MA 。 固 4 は 
-140 PRINT 年 才 や 
5 は 和民 9 けい 
160 PRINT 『 
170 COLOR ? 


2 


6 議 計 5 の よう に コン マ で 区 切っ て , 
ニニ つ 入 れ ま す 。) 

行 60 の COLOR C で は , C の 値 に 対応 する 色 で 
以下 の print 文 の 印字 を 行う よう に し ます 。 

行 100 二 120 で チュ ー リ ッ プ の 花 を 印字 し ます 。 

行 125 で は , D の 値 に 対応 する 色 で 以下 の print 
文 の 印字 を 行う よう に し ます 。 


1 -7 の 値 を 


行 130 一 160 は 葉 の 部 分 の 印字 を 行い ます 。 

行 170 は COLOR 7 で , ふだん の 白色 に 戻し ます 。 
console 文 

ト の 説明 を 見 て 下さ い 。 


(⑳) CONSOLE 0,2501 。 る 2 っ 時 
ーー シー I 基 (0 な ら 白 
スク ロー ル の 範囲 機能 キー の 半 き 黒 画面 ) 


の 開始 行 と 行 数 消す (1 な ら 表 示 

機種 X に 電源 を 入れ て 起動 し た と き の 標 準 は . 
CONSOLE 0.20,1.0 に な っ て いま す 。 つまり, 画 
面 全 体 で スク ロー ル し , 画面 の 下 に 機能 キー の 表 
示 が あり , 画面 は 白黒 で 使う と いう こと で す 。 
この よう に console 文 は 4 つの 値 を コン マ で 区 
切っ て 指定 し ます 。 第 1 の 値 は スク ロー ル ( 画 面 の 
巻き 上 が り ) の 開始 行 , 第 2 の 値 は スク ロー ル を 行 
う 行 数 ,( 上 の 例 で は 第 0 行か ら 開 始 し て 25 行 分 で 
すか ら 24 行 目 ま で と いう こと で す 。 画面 は 第 0 行 


GE ジン 


か ら は じ め て 最大 第 24 行 まで で す ) 第 3 の 値 は 機 
能 キ ー の 表示 の 有無 ( 有 が 1, 無 が 0 ), 第 4 の 
値 は カラ ー か 白黒 表示 か の 指定 ( 1 が カラ ー, 0 
が 和正 黒 ) で す 。 以前 の 指定 か ら 変 えな い 値 は コン 
マ だ け 入 れ て 省略 で きま す 。CONSOLE ,,。 1 
と 使う 場合 も あり ます 。 


color 文 
色 を 指定 する の に 使い ます 。 一般 に 
COLOR 色 待 号 ( 例 ) COLOR 7 


oe ここ ここ ここ ご = こ ニー っ と ここ ーー っ か 


の 形 を し て いま す 。 色 待 号 は 0 か ら 7 まで の 値 を 
と り , その 意味 は 次 の と お り で す 。 


96 県) 1 (大 ) 2 05 ポ 92. ST26 柴 9 
旨 0 幼 ) 、5.( 水色) 6 -() 7 ( 白 ) 


黒 は 画面 の ふだん の 背景 の 色 で すか ら 印 字 し て も 
見 え を なくなり ます 。 背景 を 考え て 使っ て 下さ い 。 
色 待 号 は 待 号 の 足し 算 が 色 の 重ね に 対応 する よう 
に 作ら れ て いま す 。1( 青 ) 十 6( 黄 )= ニ 7( 白 ) な ど と 
いう 関係 に な り ま す 。 5 の 水色 は 青 緑 に 当り ます 。 


較 input 文 と 変数 の 補足 


input 文 を 実行 する と 画面 に ? が 出 て , 人 間 に キ 
ー ボ ー ド か ら の 入力 を 要求 し て きま す 。 
ー ク だ け で は , どう いう 値 を 入力 し た ら よ いか , わ 


? の マ 
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か ら な く な る と き が あり ます 。 そこ で , プロ グラ 
ム P4-1 の 行 30 と 40 の よう な 説明 文 を 印字 する と 
親切 で す が , 短い 文 な ら , 行 50 の よう に INPUT の 
あと 引用 待 で くく っ た 文字 列 を つけ る こと が で き 
ます 。 2 つ 目 の 引用 符 の あと : (セミ コロ ン ) が 
ある こと に 注意 し て 下さ い 。 英字 1 文字 の 変数 は 
数 値 を 記憶 する た め の も の で す 。 


圏 楽し い 模 様 


以上 の や り 方 で , 別 の 模様 を 作っ て み ま し た ( 表 

示 5 )。 この 模様 は NHK 婦 人 百科 三 邦 子 先生 の 
「 棒 編み 」 か ら 頂 きま し た 。 色 を つけ た 実行 結果 
は カラ ー 頁 (82 頁 ) に あり ます 。 


圏 繰り 返し 実行 
プロ グラ ム は 原則 と し て 行 番号 の 小さ いも の か 


ら 順 に 実行 され ます 。 画面 に 小さ い 模 様 を 何 回 も 
繰り 返し て 同時 に 表示 する に は , run 指令 を 繰り 


表示 5 プロ グラ ム P4-2 も み の 木 


30 INPUT C,D 


返す こと も 一 つの 方 法 で す が , goto (ゴウ ・ ト ッ ゥ 
ー) 文 を 使っ て プロ グラ ム の 一 部 を 反復 し て 実行 
させ る こと が で きま す 。 

表示 6 を 見 て 下さ い 。 プ ログ ラム P4-1 に 行 180 
GOTO 50 を 追加 し た も の で す 。 

goto 文 

プロ グラ ム の 実行 で 次 に 実行 すべ き 行 番号 を 指 
定 し ます 。 無 条件 飛び 越し の 命令 と いい ます 。 そ 
の 一 般 形 は 


GOTO 飛び 先 


ek 夫 

この goto 文 に よっ て 行 50 か ら 行 180 が 何 回 も 繰り 
返し て 実行 され ます 。 こ の よう な 反復 を ルー プ と 
いう こと が あり ます 。 ループ は 飛行 機 の 宙返り を 
繰り 返す よう な も の で す 。 この 反復 を 終了 させ る 
に は 較 キ ー を 押し ます 。 (この キー は 機種 に よっ 
て 違い ます の で 注意 し て 下さ い 。 機種 に よっ て は 
と か と 書い て ある で し ょ う 。) 


( 例 ) GOTO 50 


10 CONSOLE 0,25, 1 , 1 
20 MIDTH 40,25 


40 COLOR C 

100 PRINT 『 縛 ノ / 
ます PR よ NE メ だ デ だ が 1 
120 PRENT " / と メア / 5 
ま 0 PRENES 2/ ん メメ に RS 
140 PRINT ” ///// ノ メグ デメ レイ スン 
150 PRINT /// が 2 プ ゲー 
まる DPR よ NT で 2 の プア / が 沈 / レオ 
まる の P 必 NT  ) / メ アメ ゾン / メ アノ ///// 7 の デア: 
180 PRINT ノノ // ルル た イム 
の 失 机 まま キッ グ メ アメ ノノ // メ が だ // 
200 PRINT " ////// ノノ //// /// が が 


2Z10 PRINT 4// ノ ルル ルン / アプ アア メルル / ルル Z/ み ん 
215 COLOR D 
220 PRINT 
230 PRTNT 
240 PRINT 
2S0 PRENT 
260 COLOR 7 


24 


表示 6 プロ グラ ム P4-3 繰り 返し 一 一 ルー プ の 構成 一 一 


10 CONSOLE 0,25,0,4 
20 MIDTH 40,25 6 
30 PRINT "1( ア オ ) 2( ア カ ) 3( ム ラサ 9 キ ) 4( ミ ト * リ )" 
40 PRINT "5( ミ ス " イロ ) 6( キ イロ ) 7( シ hn)" 
50 INPUT "イロ フ コ "9 ヲ ラ 29"3C。D 
60 COLOR C 
100 PRINT ' 還 li 
110 PRINT ” 回 還 革 6 | 敵 是 
120 PRINT | 、 2 h、 
125 COLOR D 
130 PRINT "Mk 。 還 4 コト 加 4b 回 4 コ 
140 PRINT "3、 目 衝 て 目 衝 や 目 ダ 
150 PRINT ′ 昌光 昌 ど アス 
160 PRINT ′ h、 4 h、 2 間 遇 
170 COLOR 7 
い 180 GOTO 50 
較 キ ー を 押す と [ 62 ES 
Break in 50 2 


と , 実行 を 中 断 し た 行 番号 を 表示 し て 止ま り , 
Ok 

と 表示 し て , 次 の 指示 を 待ち ます 。break は 破る 

と か 中 断 す る と いう 意味 で す 。 


な 8 ーー Se 


ボ イ ン ト し 


色 を つけ る 方 法 を 学ん で , 色 つ き 模 様 を 楽し み 
まし た 。 皆さん も 自分 で デザ イン し て プロ グラ ム 
を 作っ て みて 下さ い 。 
① 色 を つけ る 方 法 

CONSOLE 0,25, 0, 1 の 最後 の 1 が 色 (カラ 
ー) 表示 の 指定 に な り ま す 。 こ れ を し て お いて , 
color 文 で 0 一 7 の 色 待 号 を 指定 し ます 。 

(② 変 数 

C と か D と いう 英字 1 字 の 変数 が 出 て きま し た 。 

前 回 で は A$ の よう に $ の つく 変数 は 文字 列 の 記憶 


用 で ある こと を 説明 し まし た 。 これ か ら 変 数 が よ 
く 使 われ ます の で , だ ん だ ん と 慣れ て 下さ い 。 英 
字 1 字 ま た は 英字 数 字 の 形 の 変数 は 数 値 を 記憶 し 
て お く 変 数 で す 。 プ ログ ラム P4-1 な ど で は input 
文 で 与え た 内 容 を C や D の 変数 に 記憶 し て お いて , 
その 値 を color 文 で 使っ て いま す 。 
③goto 文 と ルー プ 

goto 文 は プロ グラ ム の 実行 順 を 無 条件 に 変え る 
飛び 越し 命令 で す 。 goto 文 を 使っ て ルー プ が 構成 
され ます 。 


ーー 


①⑬① - プログ ラム PP4-2 を 実 符 じ で て み で 下さ ざ ぬ 。 
⑨ プロ グラ ム P4-2 に 行 270 と し て 
270 GOTO 30 


を 追加 し て 実行 し て みて 下さ い 。 
③ 楽し い 模 様 を 自分 で 作り まし ょ う 。 
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な ぞ な そ ぞ 遊 び 


人 放送 日 11 月 3 日 ( 水 ) 欠 再 放送 日 11 月 7 日 (日 ) 


マイ コン で ゲー ム 遊 び ば か りや っ て いて は , お 母さん 方 は 心配 に な る で 
し ょ う 。 マイ コン に 向かっ て や さ し い 自習 用 の 問題 を 勉強 する プロ グラ ム を 
作っ て み ま し ょ う 。 な ぞ な ぞ や クイ ズ も 同じ プロ グラ ム で 楽し め ま す 。 個 
人 個人 の 進度 で 勉強 し て ゆけ る マイ コン の プロ グラ ム も ,。 これ か ら 良 いも 
の が 開発 され て ゆく で し ょ う 。 


く IE 箱 補 i 凡 な | よう に 指示 し ます 。 


圏 採点 は 自分 で 
行 30 は 問題 の 文 を M $ に , 答え の 文 を K$ に 読 
マイ コン か ら 短 い 問 題 が 画面 に 出さ れ , 子供 が み 込 む read( リ ー ド ) 支 で す 。read 文 は あと で 計 
それ に 答え ます 。 す る と マイ コン が 答え を 印字 し 明 し ます 。 
て きま すか ら , 合っ て いる か どう か は 子供 自身 が 行 40 は 問題 M$ を 印字 し ます 。 行 の 最後 の セミ 
判定 する よう な 簡単 な お プ ログ ラム を 作っ て み ま し コロ ン は 行 10 と 同じ で 改行 を し な いこ と を 指示 し 
た 。 自分 で 採点 する の は 気楽 な ちの で す 。 表 示 1 CUS ま 9 
の プロ グラ ム P5-1 が それ で す 。 そ の 実行 例 は 表示 行 50 は 答え を 要求 する input 文 で す 。 人間 が キ 
2 に あり ます 。 ー ボ ー ド か ら 打 ち 込 ん だ 答え は J$ に 記憶 し ます 
プロ グラ ム P5-1 の 説明 が , この プロ グラ ム で は この J $ を 別 の と ころ で 
は 使い ませ ん ., 
行 10 と 20 は 「 次 の と き に 使う 指令 や 文 を 答え て 行 60 は マイ コン か ら 用 意 さ れ た 正答 を 印字 し ま 
下さ い 」 と 答え 方 を 印字 し て いま す 。 行 10 の 最後 す 。 
の 鐘 置 (セミ コロ ン ) に 注意 し て 下さ い 。 こ の セミ 行 70 は 行 30 へ 飛べ と いう goto( 飛び 越し ) 文 で す 。 
コロ ン は 印字 後 余分 な 空 折 を お か な い ば か り で な 行 80 か ら は data (デー タ ) 広 と いわ れ , コ ンマ 


表示 1 プロ グラ ム P5-1 や さ し い 問題 


上 
まり REN NM 、 ト トキ コカ サー シ レ ルイ ヤ フッ タリ "5 


20 PRINT ' コタ エ テ 2 クタ * サ イ " K 


30 READ M ま ,K ま 問題 と 答え を DATA 文 か ら 読 む 
40 PRINT M も 』′ ==>「"』 問題 を 出す 

50 INPUT J$ ま 人 間 が 答え る 

60 PRINT "コタ エ = "5sK ま 正答 を 示す 

70 GOTO 30 


80 DATA シ " ゅ コウ セヨ ,Fun 

20 DATA 2? ログ "ラム 2 ヒ ョ 9 ウラ * セヨ 。1igt | 半 畑 と 答え を DATA 交 に 和 問 並べ て も よい 
100 DATA イン シ " セヨ 。prin モ コン マ を つけ な い 

110 DATA ニュ ウリ ョ ク セヨ ,。 1npu モ 


ジジ 
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第 1 回 の 行 30 の 実行 第 2 回 の 行 30 の 実行 
記 憶 装 置 記 憶 装 置 


30 READ M$,KS 30 READ M$,K$ 


80 DATA シド ッ コウ セヨ ,run 90jJDATA ファ "ロク ラム ヲ ヒョウ シト セヨ , 1 st 


記憶 装置 内 で 転送 され る M$ と K$ の 値 は 変っ て ゆく 


図 1 READ 文 と DATA 文 の 対応 


。 で 区 切っ て , 簡単 な 問題 と 答え が プロ グラ ム data 文 


の 一 部 と し て 記録 され て いま す 。 = デー テ る 読 な ます 。 

・read 文 で 読み 込ま れ て 記憶 され る 内 容 一 一 値 
圏 read 文 と data 文 風間 旨 き で お きま ずら 
read 文 ・data 文 自体 は 実行 され る わけ で は な く , どの 行 
・ リ ー ド と 読み , 読め と いう 意味 の 機能 語 で す 。 に お いて も か まい ませ ん 。 
・read に つづ いて , 変数 の 並び を 書き ます 。 プロ グラ ム P5-1 の 実行 で の read 文 と data 文 の 


WARP ニッ 関係 は 図 1 の よう に な り ま す 。 
:( 例 ) READ M$,K$: 
NR て プロ グラ ム P5-1 の 実行 
・ こ の 文 は data 文 と 対 で 使わ れ , data 文 の 行 番号 四 売 生 


の 若い 方 か ら , そこ に ある 文字 列 や 数 値 を 読み プロ グラ ム P5-1 の 実行 の 例 を 表示 2 に 示し て あ 
込み , read 文 の 右 に 並ん で いる 変数 一 一 記憶 場 り ま す 。 こ の 例 で は 入 か ら の 答え は すべ て 正解 に 
所 一 一 に 値 を 入れ ます 。 値 と は 記憶 内 容 を 指し , が 25GU5 ま 9 の 5 と の よう 5 な プロ グラ が 空 恒 と 
文字 列 や 数 値 の こと で す 。data 文 に 並ん で いる き は 答え を よく 確か め て 下さ い 。 

文字 列 や 数 値 を デー タ と も 呼び ます 。 - 下 か ら 2 行 目 (Ok の 直前 ) に は , 


表示 2 プロ グラ ム P5-1 の 結果 


に いり n 

キャノ 、 人 トキ こり カウ シル イ ヤ フリ ドッ 1217 フ 22 9 

>" 9 コウ セヨ ==>? run RETURN ) キ ー を 忘れ ず に 
コタ エ = Fun 

プッ ロク "ラム ラ ヒョリ ウシ" セヨ ニニ クッ: まき 

コタ エ = ]1is セ も 


イン シ " セヨ = ニニ >? pFin 七 

コタ エ = ニ pFin セ も 

ニュ ウリ ョ ク セヨ ニニ = ニ >? 1npu セ 

コタ エ = inpu セ DS 還 
Out of Data in 30 ーー 30 の nAp 交 を 実行 し た が 


生還 前 NB 
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Out of Data in 30 
と あり ます 。 こ れ は 行 30 の read 文 を 繰り 返し 実行 
し た 結果 , 「『 デ ー タ が 尽き た よ 」 と いう マイ コン 
か ら の 知ら せ ー 一 メッ セー ジー です 。 こ の よう 
な マイ コン か ら の 知ら せ は , 前 回 で プロ グラ ム の 
実行 中 圏 キ ー を 押し て その 実行 を 中 断 し た と き 
に も 

Break in 50 
と 出 て いま し た ね 。 (こう いう マイ コン か ら の 知 
ら せ は 日 本 語 で 出し て も ら っ た 方 が よい と 思う 人 
も 多い で し ょ う 。 いろいろ な 事情 が あっ て , 現在 
で は この よう な 方 式 が 普通 に な っ て いま す が , こ 
れ か ら は 漢字 も 使え る よう に な っ て き て いる の で , 
だ ん だ ん 変わ っ て ゆく か も 知れ ませ ん 。 も っ と も , 
使わ れ て いる 英語 の 文 の 種類 は そう 多い わけ で も 
な く , 機種 に よっ て 多少 の 違い が あっ て も , すぐ 
に 慣れ る で し ょ う 。) 


表示 3 プロ グラ ム P5-2 な ぞ な ぞ 


10 READ M ま ,K ま ま 
20 PRINT NM$ ぅ 
30 INPUT Aa まま 
40 PRINT "コタ エ = 5:K* ま 

50 GOTO 10 | 
お MINE は チア ミナ イオ 和 あ 3E ソ 
70 DATA ヨク ミエ ル ノ ニ カメ ラ テ * 


5 


表示 4 プロ グラ ム P5-2 の 結果 


ルー プ 


5 記 
ワク セ ナイ を すこ コメ 
80 DATA ケ セ 八 " ケス ホ ト " フェ エル モノ ナ ア ニ 。 か シコ " ム / カス 


一 問題 を 自由 に 作ろ う 


プロ グラ ム P5-1 は data 文 を 変更 し た り , 追加 
する だ け で いろ いろ 利用 で きま す 。 その と き 行 10 
と 20 の prmnt 文 は 適当 に 修正 する か , ある い は 削除 
GL ま IDXCAOSAEUS で まこ の 

入力 の 要求 が 出 て きた と き , 人 間 の 方 は , 答え 
た く な か っ た り , 頭 の 中 で 答え を 思い 浮か べ る だ け 
に し た か っ た り し ます 。 正答 を 早く 知り た けれ ば , 
キー で も た た いて や れ ば , 正答 を 印字 
し て きれ ます 。 そう いう 使い 方 を し て も よい で し 
CS) 

ここ で は , な ぞ な ぞ 遊 び を する プロ グラ ム P5- 
2 と その 結果 を 示し て お きま す ( 表 示 3 と 4)。 


圏 ル ー プ か ら の 脱出 


プロ グラ ム P5-1 や P5-2 は goto 文 を 使っ て , 


る 爺 モ ま 、 ナ アニ ょ ミ ャ ク 


Fun 

コタ エ = ミ ャ ク 

コタ エ = ユメ 

2 Ivy 9) 


Out of DATA in 10 
0k 


< 間 


し ヤ 。  2 本 3 1 < Jo よ 人 
2 お 導 の 選 ラ ーー の 生 た の E メ ナチ アニマ 土 基 
が 間 湊 束 あ いさ 人 旬 セ ナッ ナチ ちの か ラム カメ 
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プロ グラ ム P5-3 


表示 5 


DATA ヶ セ ハハ “ 
DATA / ノ 。// 
00, PRINT セン アプ“ 


ケス ホ ト " 
オォ ワ リマ シタ 。" 


10 READ M ま ,K ま トー ルー 
15 IF M$="/ ノ ノ " THEN 100 

20 PRINT M ま も: 

30 INPUT A$ 

40 PRINT "コタ T エ = ":jK ま 

50 GOTO 10 

ら 0 AE 入学 ミサ イチ "5 生 寺 : テ バ 
70 DATA ヨク ミエ ル ノ ニ カメ ラ テ " 


の あま モブ まこ ッ コ 
ブ 7 作 プレ ニッ ザラ 3 8 ソ カメ 


プ 
問題 が つき 
ルー プ か ら 


た か 判定 , 
の 脱出 


ま 衣 の アア ニッ ミ ャ ク 


デーーー 


表示 6 プロ グラ ム P5-3 の 結果 
un 
5 603 yy 2 9 ミル モノ ナ ア ニ ? ミ ャ ク 
コタ エ = ミ ャ ク 
ヨク ミエ ルノー カメ ラ テ " ウツ セナ イモ ノ ナ ア ニ ? ユメ 
コタ エ = ユメ 
か セハ "ケス ホ ト " フエ ル モ / ナ ア ニ ? か シコ " ム / カス 
ヨウ : ざさ 山地 ニカ メタ: ワリ ツ セナ イモ アミ 
ユメ 
セン フ " オリ リマ シタ 。 
0k 
プロ グラ ム の 一 部 が 繰り 返し 実行 され て いま す 。 


この よう な 同じ 部 分 の 反復 実行 を ルー プ と も いい 
ます 。 プ ログ ラム P5-1 や P5-2 で は read 文 で 必要 
な data 文 を 使い きっ て し まう と 実行 が 終っ て し ま 
いま し た が , その 時 点 で 別 の 処理 を し た いと きも 
あり ます 。 そこ で , data 文 の 終り を 検出 し て 次 の 
処理 に 移る よう な 一 つの 方 法 を 示し て お きま し ょ う 。 

プロ グラ ム P5-2 を 修正 し ます 。 行 10 の read 文 
で は MS と K$ の 変数 に 値 を 読み 込ん で いま す 。 
そこ で data 文 の 最後 に 

DATA //,// 

と いう 行 を 追加 し ます 。 そ し て , も し MS が 斜線 
2 本 の // と いう 文字 列 に 一 致す る か どう か を 判定 
し て , 一 致す れ ば 次 の 処理 に 移る よう に し ます 。 

この た め の プ ログ ラム P5-3 を 表示 5 で 見 て 下 
さい 。 その 実行 結果 は 表示 6 に あり ます 。 


圏 プ ログ ラム P5-3 の 説明 


プロ グラ ム P5-2 に 追加 し た 行 だ け を 説明 し て お 
きま す 。 

行 15 は 正 -tthen (イフ - ゼ ン ) 文 と いい , も し M 
$ の 内 容 が 文字 列 // に 一 致す れ ば 行 100 へ 飛び 
越し 一 致し て いな けれ ば 次 の 行 ( こ の 場合 行 20) 
へ 進め と いう 条件 付き 飛び 越し の 命令 で す 。 


AA 行 


if 〇 O+Ihen ム へ ム 
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行 90 は data 文 と し て 追加 し レ し た も の で 。 デー タ の 
終り の マー ク と し て 使い ます 。 

和 300 は 。「 セ トシ フ * 革 ワ リマ シタ を 渋 宇 
し ます 。 


ff-then 文 
・ イ フク - ゼ ン と 読み ます 。 
・ 一 般 に 


IF 条件 THEN 飛び 先 


と いう 形 を し て いま す 。 条件 の 書き 方 は 今後 い 
ろ い ろ な 例 が 出 て きま す 。 飛 び 先 は 行 番号 で す 。 


( 例 ) IF M$= //′ THEN 100 


この よう に 文字 列 を 比較 する と き は 引用 符 で く 
くり ます 。 


較 プ ログ ラム の 保存 と 読み 込み 


プロ グラ ム P5-1 や P5-2 で は わずか な 問題 例 し 
か 示し ませ ん で し た が , た くさ ん の 問題 を data 文 
と し て 記録 し て お く こ と が で きま す 。 記憶 装置 に 
教え 込ま れ た プロ グラ ム は マイ コン の 電源 を 切れ 
ば 消え て し まい ます 。 せっかく 作っ た プロ グラ ム 
を も う 一 度 キ ー ボ ー ド か ら 打 ち 込 まな く て も , 保 
存 し て お く 方 法 が あり ます 。 


その 保存 の た め に は , マイ コン で は カセ ッ ト テ 
ー プ レコ ー ダ や フロ ッ ピ ー デ ィ ス ク 装 置 を 使う こ 
と を が で きま す 。 スタ ダ ジ オ で は 小型 の ウロ ロッ ピ テ デ 
ィ ス ク 装 置 を 使用 し て いま す 。 こ こ で は プロ グラ 
ム の 保存 と 保存 し た プロ グラ ム を 再び 主 記憶 に 移 
す 読み 込む と も いい ます 指令 を 簡単 に 説 
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明 し て お きま し ょ う 。 機種 メ 々 で は フロ ッ ピ ー デ ィ 
スク 装置 に は フロ ッ ピ ー デ ィ ス ク を 入れ る 場所 が 
ーー つ あ り ま す (5 頁 の 図 を 参照 し て 下さ い )。 それ 
を ドラ イブ 1 と ドラ イブ 2 と 呼び ます 。 
Save 指令 

プロ グラ ム を フロ ッ ピ ー デ ィ ス ク に 保存 する の 
に 使い ます 。 プ ログ ラム に は 名 前 を つけ て お きま 
2 

ドラ イア だ 人 恒 う き 。 

Savell 名 前 生ま た は save "1 : 名 前 " 

ドラ イブ 2 を 使う と き 。 

save "2 : 名 前 " 
と 必ず も 
load 指 令 

フロ ッ ピ ー デ ィ ス ク に 保存 され た プロ グラ ム を 
主 記 境 に 読み 込む の に 使い ます 。 

ドラ イブ 1 を 使う と き 


load 名 前 | また は load "1: 名 前 " 
ドラ イプ 2 を 使う と き 
load "2 : 名 前 " 
ど し ま すず 。 


な お , カセ ッ ト テ ー プ レコ ー ダ を 使用 する と き 
は , 保存 と 読み 込み の た め に , それ ぞ れ 
csaVve "名 前 " 
cload 名 前 " 
と いう 指令 を 使い ます 。 
最近 で は , 本 屋 さ ん で も プロ グラ ム を 書き 込ん 
だ カセ ッ ト テ ー プ が 売ら れ て いる こと が あり ます 。 
その よう な テー プ を 買っ て きた と き は プロ グラ ム 
を 主 記憶 に 読み 込ん で か ら 使 うわ け で す 。 マイ コ 
ン の 機種 に よっ て load 指 令 の 使い 方 が 違う こと が あ 
り ま すか ら 注 意 し て 下さ い 。 また, フロ ッ ピ ー デ 
ィ ス ク 装 置 を 使う と き に は 使い 始め や 終り に 特別 
な 指令 が 必要 で , と くに 使っ た あと で フロ ッ ピ ー 
ディ スク を と り だ し た り , 電源 を 切る 前 に remove 
指令 を 忘れ な いこ と と いう 大 切な 注意 が あり ます 
か ら , 取扱 い 説明 書 な ど を よく 読ん で 下さ い 。 


は じ め に フロ ッ ピ ー デ ィ ス ク を 装置 に 入れ た と 
き は mount 指 令 を 使い ます 。 慣れ る まで は ドラ イ 
プ 1 を 使う こと に し て , 次 の 手順 を 標準 に する と 
よど 思い ます 。 

プロ グラ ム P5-1 を 例 に 使っ て 示し ます 。 
プロ グラ ム の 保存 


mount 1 


SaWe ま SB.5= 1 
Termove 1 
プロ グラ ム の 主 記憶 へ の 移し 
mount 1 
load "P5-1" 
remove 1 


スタ ジオ で は load 指 令 を し ば し ば 使い ます 。 


ーーーーーーーー て イシ ーーーーーーーーー 


①read 文 と data 文 

input 文 を 使っ て キー ボー ド か ら 入 力 す る か わり 
に , あら か じ め 入 力 し た い デ ー タ を data 文 に 記録 
し て お き , read 文 で 読み 込ん で 使う 方 法 を 学び ま 
し た 。 


② 下 -then 文 

マイ コン が 条件 を 判断 し て 次 の 処理 を 選ぶ こと 
が で きる こと を 見 まし た 。 こ れ か らい ろ い ろ な 使 
い 方 が で て きま す 。 今回 は こん な も の が ある と い 
う 程 度 に し て お きま す 。 


0 


① 英字 の 大 文字 と 小文字 を お ぼ え る た め に , 画 
面 に 小文字 で 表示 され た 単語 を 見 て . キー ボー 
ド か ら 同 じ も の を 打ち 込む プロ グラ ム を 作り ま 
し た 。 キー ボー ド の キー は 大 文字 で 【 生 の よう に 
書い て あり ます か ら , 画面 に a と 表示 され た ら 


[を 探す こと が 小学 生 向き の よい 練習 に な り ま 
す 。 デー タ は A BC の 歌 で す 。 

②⑨ プロ グラ ム P5-3 の 問題 と 答 を , 世界 の 国 を い 
くつ か 選ん で 国 の 名 と 首都 に し て や っ て みて 下 


さい 。 


10 PRINT "ヒュ 93* ノ ト オ リ - 99 テ クタ "サイ リ | 


20 READ NM$ 

30 PRINT NM まま 

40 INPUT A$ 

50 GOTO 10 

60 DATA abcd, efg,hi jk , 1mnop 

70 DATA qrs, and, モロ り 。 いり ぅ 8nd ょ メッ テ 
80 DATA happy,happy,shal1 ue be 
90 DATA uhen ue learn our abc "=. 
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同じ 型 を 見 つけ る 


人 放送 日 11 月 10 日 ( 水 ) 


と りあ げ ま す 。 


圏 歌 詞 の 中 の パタ ー ン 


London bridge 1S falHng down 
ンド ン プリッ イズ フォ ー リ ング ダウ ン 


faling down, falhng 4 
ー リ ング ウン フォ ー リ ング ダウ ン 


en bddge js falling down 
ロン ドン プリ ッ ジ イズ フォ ー リ ング ダウ ン 


My fair lady 
マイ レー ヤッ レデ ィ 


この 歌 を 御存じ の 方 は 多い で し ょ う 1!。 歌っ て み 
まし ょ う 。 歌詞 の 文句 は 

も 再 叶 四 員 

F$ F$ 

の 

M$ 
ee の パウ な が ー ン で みる の と と が で 間 ま 守 | づまり 

L$ を London bridge is 

F$ を faling down 

M$ を My fair lady 
と お いた わけ で す 。 こ の 歌 の 2 番 も 3 番 も 同じ 構 
造 に な っ て いま す 。 1 行 目 と 3 行 目 の L$ と F$ 
の 間 は 1 字 分 の 空白 が , 2 行 目 は 2 つの F$ の 間 
に コン マ と 空白 が 入る こと に 注意 し て 下さ い 。 


圏 いろ いろ な プロ グラ ム 


同じ 仕事 に 対し て も いろ いろ な プロ グラ ム の 書 
き 方 が で きま す 。 表示 1 一 4 の 4 つの プロ グラ ム 


念 再 放送 日 11 月 14 日 (日 ) 


単純 な 歌詞 の 中 に は , 同じ 名 が 繰り 返し 使わ れ て いま す 。 どう いう パタ 
ー ン に な っ て いる か 見 つけ る の は 。 
を 見 い 出 す 力 に つなが り ま す 。 有 名 な マザー グー ス か ら ロ ンド ン 橋 の 歌 を 


仕事 の 処理 の 中 の 繰り 返し の パタ ー ン 


を 比較 し て みて 下さ い 。 

表示 1 の プロ グラ ム P6-1 は print 文 だ け を 使っ て 
直接 に 歌詞 を 印字 し た も の で す 。 同じ 句 を 何 回 も 
打ち 込む の は や や 面倒 で すね 。 
表示 2 の プロ グラ ム P6-2 は , let 文 を 使っ て L$, 
F$, M$ に 代入 し て いま す 。 行 40 一 70 は 以下 の プ 
ログ ラム P6-3 と P6-4 と 同じ で す 。 この 場合 , 歌 
詞 の 2 番 や 3 番 も つづ け て 印字 し よう と する と , 
L$ や F$ を 入れ か える 必要 が あっ て 不便 で す 。 
表示 3 の プロ グラ ム P6-3 は input 文 を 使っ て L 
$ と F$ に 代入 し て いま す 。 こ の 場合 の 結果 を 表示 
5 で 見 て 下さ い 。 2 番 , 3 番 と 続け よう と する と , 
input 文 で の 入力 が 間 に 入 っ て きれ い に な り ま せ 
ん 。 

表示 4 の プロ グラ ム P6-4 は read 文 と data 文 を 
使っ て いま す 。 必要 な 名 は data 文 に あら か じ め 記 
録 し て お く の で , 印字 の 結果 は 表示 6 の よう に 大 
変 き れい に な り ま す 。 

read 文 を 使う と き は data 文 で 用 意 し た 句 し か 使 
えま せん が , input 文 で は どん な 句 を 入力 し て も そ 
の 句 を 使っ て , に 従っ た 印字 を し て くれ 
ます 。 その か わり , つづ り を 間違え て 入力 し て も 
その まま 印字 され て し まい ます 。data 文 で は そこ 
の 句 を よく 調べ て 正しく 打っ て お け ば よい の で す 。 
また , read 交 と data 文 に よる プロ グラ ム は 。 保 


/VN ダ ーッ 


† 歌詞 の 2 行 目 の 先頭 は 大 文字 の に すべ きか と 思い ます が , プロ グラ ム を 簡単 に する た め に 。 小 文字 を 使い 


MI た 。 
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存 (save) し て お け ば , 歌詞 を 覚え て お く こ と に 相 外 に ある こと に 注意 し て 下さ い 。 M$ へ の 代入 を 
当 し , あと か ら 何 回 で も , run す る だ け で 歌詞 を 表 1 回 し て お け ば 十分 だ か ら で す 。 も し , 行 80 を G 
示 で きま す 。 OTO30 と し て も , 結果 は 変わ り ま せん が , 行 30 が 何 

プロ グラ ム P6-3 と P6-4 で は , 行 30 が ルー プ の 回 も 無用 に 反復 実行 され る こと に な り ま す 。 ま た , 


表示 1 プロ グラ ム P6-1 ロン ドン 橋 


40 PRINT "London bridge is falling doun " 
50 PRINT "fal1ling down。 falling doun” 

60 PRINT "London bridge is 千 al ling doun 
ィ 70 PRINT "My fair lady" 8 


表示 2 プロ グラ ム P6-2 


10 LET し L ま ="London bridoge ia" 
20 LET F ま ="fa]]1ing doun" 

30 LET M ま ="My fair lady" 

40 PRINT L し も 』" 「』 F ま 

50 PRINT F$』"。 「jF ま 

60 PRINT L$』" 「』 F ま 

70 PRINT M$ 


人 和 4 


表示 3 プロ グラ ム P6-3 


30 LET M ま ="My fair laqdy" 
35 INPUT し ま ,F ま 

40 PRINT L ま 』” ":』 F ま 

50 PRINT F ま 』”, 'jF ま 


60 PRINT L ま 』" ":』 F ま 


70 PRINT NM*$ 
80 GOTO 35 
NN 


表示 4 プロ グラ ム P6-4 


0 + 
10 DATA London bridge is,fTalling dowun 


15 DATA Take the key and, lock him up 
20 DATA Off to prison ,he mus セ モ go 

30 LET M ま ="My fair 1ady" 

35 READ L ま ,F ま 

40 PRINT し L ま 』 |) 「』 F ま 

50 PRINT F ま 』", "jF ま 

60 PRINT L ま 』" 「:』 F ま 

70 PRINT MM$ 

75 PRINT 

80 60TO 35 


33 


表示 5 
プロ グラ ム P6-3 の 結果 介 9 


?London bridge is,fallino doun ニーー ス カ 
London bridge is 和 falling doun 
falling doun, 和 fal ling doun 

London bridge is 和 fallinogo doun 

My fair laqgy 

? Take the key and, lock him up =-ーー ス ヵ 
Take the key and lock him up 

]ock him up, lock him up 

Take the key and lock him up 

My fair laqgdy 

? 0f 千 to prison,he mus モ goo ォ ーー 入 力 
0ff† to prison he must go 

he must go, he mu go 

0 和 fff +o prison he must go 

My fair laqdy 

? 紀 キー 


Break in 35 
Ok 


更 2 


表示 6 9 
プロ グラ ム P6-4 の 結果 un 
London bridge is fal ling doun 
fal 1ing doun, fal 1 ing doun 
London bridge is fa]l ling down 
My fair ]ady 


Take the key and lock him up 
1ock him up, lock him up 
Take the key and lock him up 
My fair laqdy 


0ff to prison he must go 
he must go, he must go 
0ff† to prison he must go 
My fair laqgdy 


\、Out of Data in 35 / 


プロ グラ ム P6-4 で の よう に data 文 は 先頭 に あっ グラ ム は 表示 7 で す が , まず , その 実行 結果 ( 表 

て も か まい ませ ん 。 プ ログ ラム を 見 た と き に 全体 が 895 を 見 で 下さ きい 1 バル シン サ 2 バル 28 バウ 半 

が わか りや すい と ころ に 置き ます 。 印 客 され て いま すね 。 3 バン は ちょ っ と ぶ ふ ぎ ざけ て 
替え 歌 に し て み ま し た 。 歌っ て 下さ い 。 

田 番 号 の 印字 6 2 


何 番 か まで ある 責 詞 に 番号 も 付け て 印字 し た い 一 プロ グラ ム P6-5 の 説明 


と き は どう し た ら よ いで し ょ う 。 その た め の プ ロ 行 10,20,30 は 歌詞 の 繰り 返し 使わ れる 句 を data 
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文 に 記録 し て いま す 。 行 30 は ロン ドン 橋 の 3 番 を 
准 え て み ま し た 。 

行 40 は console 文 で . ここ で は , 機能 キー の 表示 
を 消し て 画面 の 下 の 段 まで 使え る よう に する た め 
KC 

行 56 は M$ に "My far 
を 代入 し ます 。 

行 60 は 変数 N の 値 を まず ゼロ に し て いま す 。 


lady'′ と いう 文字 列 


行 70 は 右辺 で これ まで の N の 値 に 1 を 足し て , 
その 結果 の 値 を 再び N に 代入 する 代入 文 で す 。 行 
70 か ら 160 は ルー プ を 構成 し て , 行 70 は 何 回 も 実行 
され ます 。 第 1 回 の 実行 で . そ れ ま で N が ゼロ な の 
で ,。 0 十 1 で 。 N は 1 に な り ま す 。 第 2 回 の 行 70 の 
実行 で 。 1 十 1 で , N は 2 に, 第 3 回 の 実行 で 2 十 1 
で 3 に , 第 4 回 の 実行 で 3 士 1 で N が 4 に な る と い 
う よ う に N の 値 が 変化 し て ゆき ます 。 


表示 7 


10 DATA London bridge is,fal ling doun Pk 


20 DATA Take the key and,lock him up バシ 
30 DATA マイ コン ハ , タ ノシ 

40 CONSOLE 0,25,0,1 

50 LET M ま ="My fair lady“ 
60 LET N=0O 


[お 守 人 2PETP'NSNSE- 、、 て コモ コー トッ ーー 前 の N に 1 を 加え て 
80 IF N>3 THEN 170 | 2 
90 READ し ま ,F$ 
100 PRINT _ Ni” ハン" 

110 PRINT し まま 』” " ぅ : F ま ーーN が 3 を 越え た ら 


120 PRTNT F$』 。 ヵ 1F ま 
3 科 ) 失 尽 NT 所 事 ま  : ょ 上 


140 PRINT MM も 


150 PRINT 
| し 160 GOTO 70 
170 END 


タス 


表示 8 
プロ グラ ム P6-5 の 
結果 


人 
London bridge is falling dowun 
fal1ling doun, falling down 
London bridge is falling down 
My fair lady 


の 0 

Take the key and lock him up 
1]ock him up, lock him up 
Take the key and lock him up 
My fair laqdy 


に 纏い boa 

マイ コン 八 、 タ ノラ 
グル 、 ジ メ タラ 
マイ コ ヨ ツ 。 信 タ ノシ 
Me Tair laqd ッ 
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行 80 は N が 3 を 越え た ら 170 へ 飛び 越せ と いう 
if-then 文 で す 。 
行 160 は 行 80 へ 戻れ と いう goto 文 で す 。 
行 170 は プロ グラ ム の 終り を 示す end 文 で , 実行 
の 終了 と も な り ま す 。 
end 文 
EGR ド ( ど 読み ます 5 
・ プ ログ ラム の 終り を 示す と と も に , 実行 の 終了 
と も な り ま す 。 


較 数 え 上 げ の 定石 


60 LET N=0 
70 LET N=N+1 


160 GOTO 70 


ここ に と り 出 し た 形 は よく 使わ れ , プロ グラ ム 
の 定石 の よう な も の で す 。 N に 反復 の 回 数 が 数 え 
上 げ ら れる こと に な り ま す 。 

この 反復 一 -ー ル ー プ ブー 一 か ら 脱 出す る の に 

60 LET N=0 
70 LET N=N+ 1 


160 GOTO 70 

17 ア 0 つづ き 
と いう 形 も 一 つの 定石 で す 。 下 -then 文 で 条件 が N 
3 と な っ て いる と 。, 3 回 反復 後に ルー プ か ら 脱 出 
する こと に な り ま す 。 ルー プ に 入る 前 に N の 値 を 
ゼロ に し て お く 行 60 の よう な 処理 を 前 処理 と か 
初期 設定 と いう こと が あり ます 。 


ーーーーーーーー ャ ポイ ント ーー ーーーーーーーー 一 


① 繰 り 返 し パタ ー ン の 発見 
上 手 な プロ グラ ム 作 り の 秘 け つの 一 つ は 処理 手 


順 の 中 の 繰り 返し パタ ー ン を 見 い 出す こと で す 。 
⑧② 数 え 上 げ の 定石 
LET N=N 十 1] と いう let 文 は 右辺 で きま る 値 


を 左辺 の 変数 一 一 記憶 場所 一 一 の 内 容 と し て 入れ 
な さい と いう こと で す 。 N と N 二 1 が 等 し いと い 
う 意 味 で な いこ と に 注意 し て 下さ い 。 な お , 十 と 
いう 記号 は 算数 と 同じ 「 足 す 」 と いう 意味 で す 。 

自然 に 理解 され た こと で し ょ う 。 


ナー 


① “松島” “名 月 " , “マイコン” な ど を 入力 デ 
ー タ と し て 
松島 や , ああ 松島 や , 松島 や 
な ど と 印字 する プロ グラ ム を 作っ て 下さ い 。 
④ プロ グラ ム P6-1 を 打ち 込ん で か ら , P6-2, 
P6-3, P6-4 と プロ グラ ム を 能率 よく 作っ て ゆ 
く キ ー ボ ー ド 操作 を 工夫 し て 下さ い 。 
プロ グラ ム P6-1 か ら P6-2 へ は 次 の よう に で 
きま す 。 
・ ま ず P6-1 を jst 指令 で 画面 に 出し ます 。 
・ 行 40 を 利用 し て 次 の 手順 で P6-2 の 行 10 を 作り 
ます 。 
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GO カーソル を 行 40 の 4 の と ころ に 移動 し , 4 を 1 


に 変え ます 。 カ ー ソ ル を PRINT の P へ 移動 し . 
[SHIFT] 較 キー で 1 ケタ の 空白 を 作り ます 。 


〇 そこ で 。 LET L$ ニ と 打ち ます : 

Ois の 次 で [SHIFT] 人 キー を 打っ て , その 後 を 
消し ます 。 

O [RETURN] キー を 押し ます 。 

・ 同 じ よ うに 行 50, 70 を 利用 し て P6-2 の 行 20 と 行 

30 を 作り 出し ます 。 

・ そ こ で も う 一 度 list 指 令 を 行い ます 。 

・P6-2 の 行 40 一 70 に な る よう に 行 40 一 70 を 修正 し 
=]・ 史 


昔 え 合わ せ 


人 @ 放 送 日 11 月 17 日 ( 水 ) 念 再 放送 日 11 月 21 日 (日 ) 


第 5 回 の な ぞ な ぞ 遊 び で は , 画面 に 表示 され た 問題 に 人 間 が 答え る と , 
すぐ に 正解 が 印字 さき され, 人 間 が 自分 で 採点 し まし た 。 こ ん ど は , マイ コン 
が 採点 や する プロ グラ ム を 作り まし ょ う 。 採点 と は , 答え が 正しい か どう 
か 判断 する 働き を 持つ こと で す 。 小学 生 や 中 学生 向き に , 楽し く 勉 強 する 


助け に な る で し ょ う 。 


較 プ ログ ラム P5-3 の 復習 


プロ グラ ム P5-3 で は , data 文 に ある 問題 と 答え 
を read 文 で 読み 込み 、 ま ず 問 題 を 表示 し ます 。 そ 
し て 人 間 が 答え を 入力 する と , すぐ に 用 意 き され た 
正解 を 表示 し まし た 。 入力 し た 答え が 合っ て いる 
か どう か の 判断 は 人 間 ま か せ に し て あり まし た 。 
プロ グラ ム P5-3 を も う 一 度 表 示 1 で 見 て 下さ い 。 


行 10 か ら 行 50 ま で が ルー プ に な っ て 反復 実行 され , 


問題 が つき た か どう か は , 行 15 の if-then 文 で 問題 
を 記憶 する 変数 M$ に 文字 列 "プン" が 入っ た か 
どう か で 判断 し て いま す 。 
田 判 定 す る プロ グラ ム 

プロ グラ ム P5-3 を 少し 変更 し て , 人 間 が 入力 し 
た 答え ーーA$ に 記憶 し て ある 一 が あら か じ め 


表示 1 プロ グラ ム P5-3( 再 掲 ) 


用 意 し た 正解 一 一 K$ に 入っ て いる 一 に 一 致し 
て いる か を 判定 し 合っ て いれ ば 

テ " キ マシタ! 八 " ン サド イ 1 ドン サ " イ ! 
と 印字 し , 間違っ て いれ ば 

サン ネン ! 


と 印字 し て , 正解 を 印字 する よう に し て み ま し ょ 
う 。 ダ ロ グ ラム P7-1 を 表示 2 で 見 で 下さ ゆめ 。 


較 プ ログ ラム P7-1 の 説明 


行 10 は , プロ グラ ム の 名 前 を 書い た rem 文 で , 
プロ グラ ム の 働き に は 関係 あり ませ ん 。 

行 20 は , data 文 に 用 意 さ れ て いる 問題 と 答え を 
読み 込む read 文 と , 問題 が つき た か どう か の 判定 
を 行っ て いる 正 -then 文 の 二 つ が 並ん で いま す 。 こ 
の よう に 較 窟 紅 計 以下 の 区 を 時 パ る | こと が で 
き ,. その と き の 間 を 思 加 用 NG 区 90 ま 9) 。 


10 READ M* ま ,K*$ 

15 IF M ま ="//" THEN 100 
20 PRINT M ま も: 

30 INPUT み a ま 

40 PRINT 
50 GOTO 10 

6 は: 四谷 も な アポ ナ 和 ES の 人 ト ング 


"コタ エ = 3K ま 


70 DATA ヨク ミエ ル ノ ニ カメ ラテ" 


20 DATA //,// 
100 PRTNT、 ミン フ " オツ リマ ラッ タ 。 “ 


ト に 


に ゴム 人 の す 
ウツ セナ イモ ノド ナ モッ コメ 
80 DATA セハ " ケス ホ ト " フエ ル モ ノ ナ ア ニ 。 サ シコ " ム / カス 


本 E74 


表示 2 プロ グラ ム P7-1 マイ コン が 判定 


人 


10 
20 


RE 時 PF イーt 


PRINT M ま 』:INPUT A ま ま 
IF A ま =K ま THEN 70 
PR1NT サン ネン ! 3 人生 
GOTO 20 

PRINT " テ " キ マシタ! 
GOTO 20 

STOP 


AE 和合 


220 DATA ノア,// 


READ M ま も ,K ま :IF M ま ="//” THEN 90 


200 DATA 2+3。5,4+5 。9。6+2 。8。 
210 DATA 8+2。10。7+6。13。9+2 。 


"3K ま 
1 か 


に 
11 4+8。12 


MSN 


行 30 は , 問題 (M $ ) を 印字 し , 人 間 の 答え を A$ 
に 入力 し ます 。 

行 40 が 今回 の ポイ ント で す 。 人 間 の 答え A$ 
と 用 意 さ れ た 正解 K $ が 一 致し て いれ ば 行 70 へ 行 
き , そう で な けれ ば 次 の 行 ( 
め と いう 中 then 文 で す 。 

行 50 は 人 間 の 答え が 間違っ て いた と き に 実行 さ 
れる print 文 で す 。 

行 60 は 行 20 へ 戻っ て , 
す 。 

行 70 は , 行 40 で 答え が 合っ て いる と 判断 され た 
と き に 実行 され , キマ シタ ! ンジ ザイ 
1 スン OS01502IEDSRAI み まで 9 

行 80 は , 行 20 へ 戻る goto 文 で す 。 

行 90 は , 行 20 で 問題 が つき た と 判断 され た と き 


ヽ ー 


電 全 、 


の 場合 行 50) へ 進 


次 の 問題 に 移る goto 文 で 


テバ 


XN 


ん V 


Ge 双 は メモ 書き 


飛び 越し て き て , 実行 を 中 断 す る stop 文 で す 。 
行 200 か ら , や さ し い 足し 算 の 問題 を た 用意 し まし 
た 。 行 番号 を 飛ば し て ある の は , あと で その 間 に 
文 を 追加 する た めで す 。 
行 220 に は , デー タ の 終り の し る し と し て 斜線 を 
2 本 ずつ 並べ て あり ます 。 
rem 文 
・ レ ム と 読み ます 。 英語 の remark (注釈 ) に 由 
来 し 。 リ マー ク 文 と も いわ れ ま す 。 
・rem 文 は 人 間 の た め の メ モ 書 き で あっ て , 
プロ グラ ム の 働き に は 関係 あり ませ ん 。 
・ プ ログ ラム の 名 前 や 番号 , 作成 者 や 作成 日 。 主 
要 な 区 切り , プロ グラ ム 内 容 の 説明 な ど を rem 
共 任 肉 お で お く と よい で じょう ぁ 
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較 プ ログ ラム P7-1 の 実行 


プロ グラ ム P7-1 の 実行 例 を 表示 3 に 示し ます 。 
計画 どおり に な っ て いま すね 。 最 後 の Ok の 前 に 
Break in 20 
と 表示 され て いる と ころ を 見 て 下さ い 。 こ れ け は , 
プロ グラ ム P7-1 の 行 90 の stop 文 を 実行 し た こと に 
より ます 。 実行 中 に キー ボー ド の 較 キ ー で プロ グ 
ラム を 中 断 し た と きも , この よう な 表示 が あり ま 
2278 
stop 文 
・ ス トッ プ と 読み ます 。 
・ プ ログ ラム の 実行 を 中 断 する 命令 で す 。 
・Break in 90 の よう に , stop 文 の ある 行 番号 を 
示す 知ら せ が 印 字 さ れ ま す 。 
・stop 文 は end 文 と 違い , 実行 を 中 断 す る だ け で 
[CIOINIT] [RETURN] 
と キー を た た け ば 引き 続い て 実行 を 続け る こと 
が で きま す 。 こ れ を cont 指 令 と いい ます 。 


表示 3 プロ グラ ム P7-1 の 実行 例 


FU 


2 ク TS 5 
テ " キ マシタ! 八 " ン サイ! "ゾン サ " イ ! 
し か 
テキ マシ タ ! ルソン サ "ドイ! ハル" ン サ " イ ! 
6+2? 8 
テ " キマ シタ | ハル " ン サ ドイ ! ドン サ “ ド イ ! 
3+6? の 
テ * キマシタ ! ハル" ン サ サイ! ルソン サド イ ! 
8+2? 10 
テ *" キマシタ! ル " ン サイ ! "ソン サ * イ ! 
7+6? 12 
サン ネン ! 7+6 = 13 
9+2? 11 
テ " キ マシタ! 八 " ン サド イ 1 ドン サド イ ! 
4+8? 12 
テ " キマ シタ |! 内 " ン サ "ドイ 1 内" ン サ ドイ 1! 
Break in 20 
0k 

SA 


cont 指令 

・ コ ント と 読み ます 。 英語 の continue (続け る ) 
に 由来 し ます 。 

・stop 文 の 実行 , また は プロ グラ ム 実 行 中 の 回 キ 
ー に よる 中 断 の あと , 必要 な ら 実 行 を 続け る こ 
と を 指示 し ます 。 


較 プ ログ ラム P7-1 の 改良 


プロ グラ ム P7-1 を 実行 し て みる と , 二 つ の 点 を 
改良 し た く な り ま し た 。 一 つ は , 人 間 が 答え を 入 
力 す る と き , 最後 に キー を 押す こと を 
4 れ む や 9ika と いう こと で す 。 マイ コン の ここ を よ 
く 知 ら な い 小 学生 な ど に は , 

コタ エタ ラ [RETURN] キー ヲ オス 
と いう 表示 を , 最初 に し て お く こ と が 親切 で し ょ 
の 

第 2 の 注文 は , 問題 を 何 問 や っ て 何 問 で きた か 
と いう 結果 が わか っ た 方 が よい と いう こと で す 。 

この 2 点 を 改良 し た の が プロ グラ ム P7-2 で す 。 
表示 4 を 見 て 下さ い 。 そ の 実行 例 は 表示 5 に あり 
ます 。run 指 令 の あと , 

コタ エタ ラ RETURN キ ー ヲ オス 
と 印 演 され て いる と ころ , 終り の Ok の 前 の 3 行 の 
と 

軸 o06 電 スガ ンク 攻 


ドル 
に 生生 0 が 0 ボン 


と 表示 され て いる と ころ を 見 て 下さ い 。 


較 プ ログ ラム P7-2 の 説明 


行 15 は , 正解 と 間違い の 数 を か ぞ え る た め の 変 
数 S と M を ゼロ に し て お く 前 処理 の let 文 で す 。 
let 文 の LET は 省略 し て も か まい ませ ん 。 

行 17 は 答え を 入力 する と き の 注 意 を 印字 し て い 
ます 。 

行 20 一 50 と 行 70 は プロ グラ ム P7-1 と 同じ で す 。 

行 60 で は , 間違え の 数 を か ぞ え て いま す 。 
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表示 4 


プロ グラ ム P7-2 マイ コン が 採点 


人 SN 
10 REM P ァ -2 
15 LET S=0: NM=O 
17 PRINT "コタ エタ ラ RETURN キ ー ヲ オォ オス" 

20 READ M ま ,K ま :TIF 4 ま ="//" THEN 90 
30 PRKINT M::INPUT A ま 

40 IF Aa まま =K ま THEN 70 

PR 江間 下 シッ ネ シ 】 2 * 章 事 ーー が KK 定 

60 LET M=M+1: GOTO 20 

夫 馬 PRENT チー キマ シタ | "ツラ サ ドイ 1 AA* ン サ ドイ す “ 
80 LET S=S+1: GOTO 20 

20 LET N=S+M 

100 PRINT 

和香 展 衝 剛 > 失 を モン ルナ の まい 

120 PRINT "セイ カイ 八 "3S3" も モン" 

130 PRINT "マチ カイ 人 ル "3Mz | モン " 

200 DATA 2+3,.5,4+5,9,6+2.,.8,3+6 9 
210 DATA 8+2,10,7+6,13,9+2,11 4+8,12 
220 DATA //,// 

KS と 4 

表示 5 プロ グラ ム P7-2 の 実行 例 行 80 で は , 正解 の 数 を か ぞ え て いま す 。 
un 陸 行 90 で は , 問題 が つき た と き に ここ に 飛ん で き 
コタ エタ ラ RETURN キ ー ヲ オス て , 正解 と 間違い の 数 の 和 , つま り , 問題 数 を 求 
2+37 つ め て , 変数 N に 入れ て いま す 
テ “" キマ タタ | "ドン サド イ 1 リン サ \ イ ! 2 暫 S 
4+5? 9 行 100 か ら 130 が 結果 の 印字 で す 。 

テ * キマ シタ | 敗 " ン サド イ 1 ツン サイ | 
6+2? 8 圏 カ ウン タ 
テテ "キマシタ! 敗 " ン ササ イ 1 ルツ" ン サ \ イ | 
3+6? の 第 6 章 で は 歌詞 の 番号 を 数 える 働き を 見 まし た 。 
テ “ キマ シタ | 八 " ン サド イ !1 ツン サ \ イ | 0 も 3 3 NE 
テ " キマ シタ |! 稚 " ン サ " イ 1 只 " ン サド イ | ぞ れ 正解 と 間違い の 問題 数 を 数 え 上 げ て いま す 。 
7+6? 13 還 ・ 
テ * キ マシ ミタ! ツン が イ 1! ソイ 1 この よう な 働き に 使う 変数 を ., と くに , カウ ンタ 
9+2? 12 と 呼ぶ こと が あり , プロ グラ ム の 中 で し ば し ば 利 
サ " ン ネン ! 9+2 = 11 用 され ます 。 
4+8? 12 8 6 の 
テ ゞ キマ シタ |! AA" ソン サイ | "ソン サ ドイ 1! ルー プ ブ の は じ ま る 前 に 

Sー0:M 三 0 
GSSSE ジ ウチ ーー 
沙 Y れ アー キッ の よう に , 前 処理 と し て , その 値 を ゼロ に し て お 
マチ カイ 八 1 モン きま す 。 こ れ を 初期 設定 と も いい ます 。 ル ー プ の 
Ok 中 で は , 

S= テ S 十 1 

9 ュ イ M ニ テ M 十 1 
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図 1 


カウ ンタ の 変化 


の よう に , これ まで の 値 に 1 を 足し た 値 を 新しい 
値 と し て 記憶 し ます 。 こ の よう な カウ ンタ の 使い 


娘 語 ZZ グラ ム の 邊 石 の 王 つ と し て 息 え 当 下 きい 5 


説明 の た め の 図 1 を 見 て 
市 以 = 員 な の 


S と M の 変化 を 追っ て 


較 行 番号 の 付け か え 


表示 4 の プロ グラ ム P7-2 の よう に 行 を いろ いろ 
と 追加 し た プロ グラ ム の 行 番号 を きれ い に 付 け か 
OSGR020GEN ま SS の の だ の に 、 


renum 指 令 を 


行 80 の 実行 (2 度目 ) 


行 60 の 実行 行 90 の 実行 


60 LET M=M+1 


90 LET N=S+M 


renum 指 令 

・ 英 語 の renumber (リナ ン バ , 番号 の つけ か え 
と いう 意味 ) に 由来 し ます 。 

・ 例 えば 。 た だ 

renum [RETURN] 

と し ます と , 行 10 か ら 10 番 お き に , 行 番号 を 付 
け か えら れ ま す 。 表示 6 に その 結果 の プロ グラ 
ム が 示さ れ て いま す 。 
・ 一 般 に は , も と の プロ グラ ム の ある 行か ら う し 


ろ の 部 分 を 、 適当 な 間隔 (増分 ) の 新しい 行 番 


使い ます 。 020 この SAS の 5 と の カ 人 で 吉 く ます 
表示 6 プロ グラ ム P7-2 の 行 番号 を 付け か える ( 行 10 だ け P7 -2 を P7 -3 に 変更 し て あり ます ) 
信 9 
10 REM P7-3 
20 LET S=0: M=O 
30 PRINT "コタ エタ ラ RETURN キ ー ヲ オス " 
40 READ M ま ,K ま : IF M ま ="//" THEN 110 
50 PRINT M::INPUT ム A も 
60 IF A ま =K ま $ THEN 20 
70 PRINT "9" ソ ネン! "35M ま ぅ | ニー skK ま 
80 LET M=M+1: GOTO 40 
20 PRINT " テ " キ マシタ ! 内 " ン サ サイ 1 稚 " ン サイ!“ 
100 LET S=S+1: GOTO 40 
110 LET N=S+N 
120 PRINT 
8APRENT Ni モン プ 9 チ 
140 PRINT "セイ カイ 内 353" モン" 
150 PRINT "マチ カ " イ 八 "Mi" も モン" 
160 DATA 2+3,5。4+5,9。6+2.。8。3+6 。 う ツ 
170 DATA 8+2。10,7+6 13,9+2 。1 1 ,4+8 ,12 
180 DATA //,// 
NN 2 
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①if-then 文 に よる 判定 と 分 岐 ウン タ の 使い 方 と し て , 前 処理 と 1 を 足し て ゆく 
下 -then 文 の 典 形 的 な 使い 方 で ある 条件 が 成り 立 le6 燃 ーーー 全 ば S 且 0 つど S 三 S ボ ON0SUSI ウ 
つか どう か の 判定 と その 結果 に よる 仕事 の 流れ の 形 を 覚え て 下さ い 。 

分 岐 の 例 を 学び まし た 。 ③ 二 つっ 以上 の 文 

(カウ ンタ 1 行 に 二 つ 以 上 の 文 を 並べ て 書く こと が で きま 


ある 仕事 を 行っ た 回 数 な ど を 数 え 上 げ て ゆく カ す 。 その と き は コロ ン : を 区 切り に 使い ます 。 


ーー ーー ーー 


① プロ グラ ム P7-3 の data 文 の 問題 と 答え を 変え M< く 2 な ら "アナ タ ハ テン サイ " 
て 実行 し て みて 下さ い 。 例えば, 中 学 1 年 生 な MS な ら ミ トミ リョ ク ' 錠 コ ヨウ \ 
ら 表 示 7 の よう に し て み で 下さ い 。 と 印字 する よう に 直し て 下さ い ( 表 示 8 )。 


〈⑫⑨ プロ グラ ム P7-3 の 行 150 の あと で , 


表示 7 


160 DATA うー〈( 一 2 ) 。5 一 2+( -3 ) , -5,。 2-3。-1 
170 DATA -5-(-6) , 1 , 4+(-8) ,-12 
180 DATA //,// 


PRINT 
IF M<2 THEN PRINT "アナ タ 八 テン サイ " 
IF M>S THEN PRINT “ ト " リ ョ ク シヨ 39" 


(現在 の た いて い の マ イコ ン で は , if-then 文 の あと に 別 の 文 を 書く こと が で きま す 。) 
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バス の 乗客 


候 放 送 日 11 月 24 日 ( 水 ) 


00 


解 し まし ょ う 。 


人 @ 再 放送 日 11 月 28 日 (日 ) 


バス に 乗り 降り する 乗客 を 数 えて ゆく プロ グラ ム で クイ ズ を 出し ます 。 
クイ ズ は, や っ て みて の お 楽し み と し ます が , も う 知 っ て いる 人 が 多い で し 
ょ う 。 合計 を 求め る た め の 変 数 や カウ ンタ と し て の 変数 の 働き を 確実 に 理 


圏 クイ ズ 


ま ⑨: 2 所 グラ ラム PStU を 実 秦 じ で み ま ま う : 
表示 1 を 見 て 下さ い 。 バス が 始点 の 停留 所 を 出発 
し まし た 。 もちろん, 降り た 人 は ゼロ で す 。 乗っ 
た 人 は 10 人 で し た 。 次 の 停留 所 で 降り た 人 は ゼロ , 
乗っ た 人 は 4 人 , 乗客 は 14 人 に な り ま し た 。 次 に 


表示 1 クイ ズ ( プ ログ ラム P8-1 の 実行 例 ) 


run 
ォ リ タ ヒト ? 0 
プッ タダ トド Y 19 


hereyYEncosaa リバ を 
ェ ーー ーーーーーーN の 値 
ラ * ョ ウキ ャ ク 10 <ーーーーーZ の 値 
ォ リ タ ヒト ? 0 

人 

ッ " ョ ウキ ャ ク 14 


ジル / 谷 =2 2 ス 
ナウ クタ EKY 価 
シ " ョ ウキ ャ ク 16 


オリ タ じ ド 7 5 
3 
に 4/ 人 RC] 


ォ リ タ ヒト ? 4 
ノッ タ ヒト ? 0 
シ " ョ ウキ ャ ク ウ の 


ォ リ タ ヒト ? 9 

ノウ タ ヒト ? 1 | 
テイ リュ ウシ " ョ 八 イク アリ マラ シ タカ? 
0k 


に 


降り た 人 が 2 人 , 乗っ た 人 が 4 人 , 次 に 降り た 人 
が 5 人 , 乗っ た 人 が 2 人 , 次 に 降り た 人 が 4 人 , 
乗っ た 人 が ゼロ , 最後 に 降り た 人 人 が 9 人 , 終点 で 
乗っ た 人 は いま せん 。 終点 の し る し と し て 一 1 と 
いう 数 が 入力 され て いま す 。 さ て , 停留 所 は いく 
つ あ り ま し た か ? 


較 プ ログ ラム P8-1 の 説明 


この クイ ズ を 出す プロ グラ ム P8-1 を 表示 2 で 見 
て 下さ い 。 

行 10 は この プロ グラ ム の 名 前 が P8-1 で ある こと 
を 示す rem (注釈 ) 文 で す 。 

行 20 は 乗客 数 を 数 えて お く た め の 変数 Z を ゼロ 
に し て お く 前 処理 で す 。 

行 30 は , ルー プ の 開始 の 行 で ある こと を は っ き 
り 示 す た め に 入れ た rem 文 で す 。 行 30 は 削除 し 
て も か まい ませ ん が , その と き は 行 100 の GOTO 
30 を GOTO 40 と 変更 し て お く 必 要 が あり ます 。 

行 40 は 

オリ ター ヒト .? 
と きい て , 降り た 人 数 を D に 入力 し ます 。 

行 50 は , 乗っ た 人 数 を N に 入力 し ます 。 

行 66 は , N に マイ ナス の つい た 数 が 入力 され た 
ら 終 点 と 思っ て , 行 110 に 飛べ と いう 正 then 文 
ea 

行 70 は , これ まで の 乗客 数 一 一 Z の 値 一 一 か ら 
降り た 人 数 一 一 D の 値 一 一 を 引き , 乗っ た 人 数 一 
N の 値 一 一 を 足し て , 新しい 乗客 数 と する let 
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了 表示 2 
ログ ラム P8-1 
ッ ィ | 10 REM P8-1 


20 LET Z=0 


80 PRINT 
20 PRINT 
100 GOTO 30 
110 PRINT 
120 INPUT T 
130 END 


き 二 


30 REM ーー- 

40 INPUT “オリ タ ヒト "3D 
50 INPUT "ノッ タ ヒト "jiN 
60 IF N<O THEN 110 


70 LET Z=Z-D+N 
タラ” ョ ウキ ャ ク 


- テイ リュ ウシ " ョ 八 イク ツ アリ マシ タカ "5 


ジア 


Rg 

行 80 は 、 乗客 数 を 印字 し ます 。 

行 90 は , 改行 だ は し て いま す 。 

行 100 は , 行 30 へ 戻っ て 、 ルー プ を 作り ます 。 
行 110 は 、 クイ ズ の 間 題 を 印字 し て いま す 。 
行 120 は , ク イズ の 答え を 受け と る た め 入 力 待ち 
の 状態 を 作っ て いま す 。 

行 130 は プロ グラ ム の 終り で す 。 実 行 の 終了 と も 
な り ' ま す 。 

この プロ グラ ム は その 内 容 を 知っ て いる 人 が , 


内 容 を 知ら な い 人 に お も し ろく 話し か け な が ら 。 
実行 し て みせ る と 楽し く な る で し ょ う 。 


一 停留 所 を か ぞ え る 


プロ グラ ム P8-1 を 修正 し て , 停留 所 の 数 を か ぞ 
える よう に する に は , 数 え 上 げ 用 の 変数 一 一 カウ 
ンタ ー 一 を 使っ て 。 プ ログ ラム の 行 20 で t= ニ 0 を 
加え , 行 50 と 60 の 間 で t=t 二 1 で 停留 所 通過 ご と 
に カウ ンタ を 1: ず つぶ や す よう に ずれ ば 邊 NN で 
ょ う 。 その 他 の こま か い 修 正 の 手順 は 表示 3 を 見 


表示 3 
プロ グラ ム P8-1 の 修正 3 
] 1 = も 


aa 


1 を 2 に 変え て ある 
・t テ 0 を 打ち 込む 


40 INPUT "オォ リタ ヒト "sjD 
_- 50 INPUT "ノウ タ ヒト "3N 
60 IF N<O THEN 110 

70 LET Z=Z-D+N 

80 PRINT " ラ " ョ ウキ ャ ク "3Z 

20 PRINT 

100 GOTO 30 

110 PRINT "シュ ウ テ ン テ " ス "<ーーー 修正 

120 INPUT T 

130 END 

120 

52 1 七 = ニモ +1 
了 PP1n 七 テイ リュ ウシ " ョ 


行 120 を 削除 


・。 も 上 過 加 
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て 下さ い 。 表示 3 は 修正 を 行っ た と き の 画 面 で す 。 表示 4 プロ グラ ム PB8-2 停留 所 を 数 える 


プロ グラ ム P8-1 を load 指 令 で 主 記憶 に 入れ ,、 そ の 
list を と っ た 状態 か ら 始め ます 。 
① 行 10 の P8-1 の 1 の と こ 
て 2 に 変え ます 。 そ こ で [RETURN] キー を 押す 。 
(カー ソル を Z テ 0 の あと に も っ て ゆき , 

: モニ 0 [RETURN] 


を 打ち 込み ます 。 


(カー ソル を 行 130 の 下 ! 
[RETURN] キー を 使う と 
ー ソ ル 移 動 の 人] キー だ け 使 えば , Ok は 消え ませ 


ん 。) 
(④ 行 120 を 削除 する た め , 


⑤ 行 52 と 54 を 追加 し ます 。 


REM P8-2 
20 LET Z=0:T=0 

9 紀 思 靖 ーー テ 

40 INPUT “オリ タ ヒト "3D 

50 INPUT "ノッ タ ヒト "3N 

の 2: 北 名 デキ ず よ 

54 PRINT "テイ リュ 9 シ " ョ ニー 531。 
60 IF N<O THEN 110 

70 LET Z=Z-D+N 

80 PRINT " シ " ョ ウキ ャ ク "3Z 
20 PRKINT 

100 GOTO 30 

110 PRINT "シュ 9 テン テ " ス " 
130 END 


ろ に カー ソル を 移動 し 


こさ げ ま す 。 (その どき, 
Ok の 表示 が 消え ます 。 カ 


120 [RETURN] と し ます 。 


ここ で , HiSt を も う 一 度 と る と , 表示 4 の プロ グ て 下さ い 。 print 文 で の コン マ の 働き は あと で 説明 


ラム P8-2 が 得 ら れ ま す 。 


行 54 の 最後 が コン マ に 


表示 5 
プロ グラ ム P8-2 の 
実行 例 


3 天 9S 
な っ て いる こと に 注意 し プロ グラ ム P8-2 の 実行 結果 を 表示 5 に 示し ま 
Un 
オォ リタ ヒト? 0 D の 値 


N の 値 


メック PF 8 


チイ リュ クコ シ " ョ ウキ ネ ャ ク 10 Z の 値 
RT T の 値 

ォ リ タ ヒト ? 0 

ノッ タ ヒト? 4 


ンジ た と か っ ラ * ョ ウキ ャ ク 14 


人 りあ ピ 学 人 6 之 
ノッ タ ヒト ? 4 
ナル サ ュ クラ たま 9 うつ 生 本 吉 グ ド ま の ら 


ォ リ タ ヒト ? 5 
ノッ タ ヒト ? 2 
テイ リュ ウタ“ ョ 4 >" ョ ウキ ャ ク 13 


オォ リタ ヒト ? 4 
ノ ゅ タ ヒト ? 0 
テイ リュ ウシ “" ョ 5 シ " ョ ウキ ネ キャ ク ウ 


オォ リ タ ヒト ? の 
0 タダ ト し NZ2SSa ま 
テイ リュ ウシ “" ョ ら 6 シュ ウチ ジン テ "スズ 
0k 
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す 。 や 乙 の 変化 の 様子 を 見 て 下さ い 。 変数 と い 
われ る 理由 が わか る で し ょ う 。 


一 合計 を 求め る プロ グラ ム 


入力 され る デー タ の 合計 を 求め る プロ グラ ム を 
考え て み ま し ょ う 。 例 えば , 重量 製 限 500kg の エレ 
ベー タ に お 相撲 さん の よう に ふと っ た 人 が 乗っ て 
き て , その 体重 の 合計 を 順に 求め て いっ て , 500kg 
を 越え た ら プ ザー を 鳴ら し て み ま し ょ う 。 プ ログ 
ラム P8-3 を 見 て 下さ い ( 表 示 6 )。 

行 20 で , 合計 を 求め て 記憶 する 変数 S を ゼロ に 
払っ て お き , 行 30 か ら 70 を 繰り 返し ます 。 行 40 で 
体重 を A に 入力 し , 行 50 で S に A の 値 を 加え 込み 
ます 。 行 60 で A と S の 値 を 並べ て 印字 し ます 。 行 
70 で S の 値 を 制限 の 500kg と 比べ 500 以 下 な ら 行 
30 へ 戻り 500 を 越え れ ば 次 の 行 80 に 進み ます 。 行 80 
で は BEPEEP (ビー プ ) と いう 文 を 2 回 実行 し ます 。 
beep 文 


表示 6 プロ グラ ム P8-3 エレ ベー タ の 重量 制限 


REM P8-3 
LET S=0 
し 4 コ da 
INPUT AaA 


LET S=S+A 

PRINT AS 

IF S<=500 THEN 30 
BEEP : BEEP 

END 


表示 7 プロ グラ ム P8-3 の 実行 例 


・ ビ ー プ と 読み ます 。 

・ 一 定 の 短い 時 間 プ ザー を 鳴ら し ます 。 

テキ スト の 上 で は ブザー の 音 は きこ えま せん が 
プロ グラ ム P8-3 の 実行 例 を 表示 7 に 示し て お きま 
ます 。 


圏 print 文 で の コン マ 


プロ グラ ム P8-3 の 行 60 は 
PRINT A,S 
と な っ て いま す 。 ま た , プ ログ ラム P8-2 の 行 54 は 
PRINT "テイ リュ 9 ラ シ * ョ ー ぅ 3 生還 
と , コン マ を 使っ て いま す 。 print 文 中 の コン マ は 
次 の よう な 働き が あり ます 。 印字 の 際 , 1 行 を 左 
か ら 14 字 分 ずつ の 印字 欄 に 分 け 、 そ の 印字 欄 を 
単位 に し て 左 か ら 使い ます が , コン マ が 現れ る と 
次 の 印字 欄 の 先頭 に 飛び ます 。 上 の 例 の 
PRINT A,S 


の 場合 、 A の 値 を 印字 し た あと , 第 15 け た まで 飛 


表示 8 プロ グラ ム P8-4 


REM P8-4 
20 LET S=0 
1 
40 INPUT Aa 
っ 0 LET S=S+A 
60 PRINT ,S 
70 IF S<=500 THEN 30 
80 BEEP:BEEP 
END 


表示 9 プロ グラ ム P8-4 の 実行 例 


"Un 


1 
まき 


ん で 。 そこ か ら S の 値 を 印字 し ます 。 例え ば , 
PRINT ,S 

と , コン マ が すぐ に 出 て くる と , 第 1 の 印字 欄 に 
は 何 も 印 字 し な いで , 第 2 印字 欄 の 先頭 の 第 15 け 
た まで 飛び そこ か ら S の 値 を 印字 し ます 。 プロ 
グラ ム P8-3 の 行 60 を PRINT ,S に 直し た プ 
ログ ラム P8-4( 表 示 8 ) と その 結果 (表示 9 ) を 示 
し て お きま す 。 な お , プ ログラム P8-2 の 行 54 の 例 
で は , 第 1 の 印字 欄 に 


テイ リュ ウシ "ヨロ 
と 印字 し て , その あと が セミ コロ ン で すか ら 続 け 
て 工 の 値 を 印字 し ます 。 そ の と き , まだ , 第 1 の 
印字 欄 に 余裕 が あり ます 。 そこ で の の 次 の コン 
マ で 第 2 の 印字 欄 に 進み ます 。 その print 文 は コン 
マ で 終っ て いる の で , セミ コロ ン で 終る 場合 と 同 
様 に 葬 委 監 な で, 次 の print 文 に つなが り ま す 。 


今回 は これ まで 習っ て きた 機能 を 確か な も の に 
する た め に , バス の 乗客 数 や 合計 の 重量 な ど を 求 
め る 処理 と , 停留 所 の 数 を か ぞ え る カウ ンタ の 使 
用 手順 を と りあ げ ま し た 。 


①let 文 に つい て 
S テ S 十 A 
Z テ ZーD+N 
N テ N 十 1 


な どの 意味 を よく 理解 し て 下さ い 。let 文 の 一 般 の 
形 は 


LET 変数 = 式 

と な り ま す 。 式 と し て は 今後 さら に 複 槍 な も の が 
出 て きま す 。 式 の 値 が 求め られ て 左辺 の 変数 に 記 
憶 さ れ ま す 。 式 の 中 に 出 て くる 変数 の 値 は その 式 
の 値 を 求め る た め に その 時 点 で 決っ て いな けれ ば 
な り ま せん 。 変数 の 値 は let 文 で 代入 され た り , 
input 文 や read 文 で 入力 され た り 読 み 込ま れ て 変化 
し ます 。 し か し , 変数 の 値 は その 変数 が let 文 の 右 
辺 の 式 や print 文 で 使わ れ て も 変化 し ませ ん 。 


ーー MM ーー 


① 次 の 要領 で 自動 販売 機 の 働き を 真 公 する プロ 
グラ ム を 作っ て みて 下さ い 。 硬貨 を 入れ る と き 
は 正 の 値 を A に 入力 し て , 合計 金額 S を 求め , 物 
を 買う ボタ ン を 押す と き は 負 の 値 を A に 入れ て 
S= テ S 十 A で 残高 を 求め 、 そ の 残高 を 釣り 銭 
と し て 印 放 する プロ グラ ム を 書い て 下さ い 。 


⑧② 小遣い を 1000 円 ちら っ た 。 100 円 , 50 円 , 70 円 
と 使っ た あと , また 1000 円 も ら っ た 。 それ か ら 
150 円 ,80 円 と 使っ た 。 入金 は 正 の 数 , 出 金 は 負 
の 数 と し て 入力 し , その つど 残高 が 印字 され る 
よう な プロ グラ ム を 書い て 下さ い 。 
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人 の 放送 日 12 月 1 日 ( 水 ) 傘 再 放送 日 12 月 5 日 (日 ) 


小学 校 の 生徒 が 自分 の クラ ス の 忘れ 物 調 べ を し て , 品物 別に 件 数 を 出し 
まし た 。 この よう な 結果 は 棒グラフ に し て みる と その 様子 が よく わか り ま 
す 。 とくに, 件 数 の 多い 順に 並べ て 表示 する と よい で し ょ う 。 その よう な 
棒グラフ を パレ ー ト 図 と いう こと が あり ます 。 


語 忘 れ 物 調 べ 会 の 出欠 席 と か アン ケー 1 還 
に 提出 する こと に な っ て いる 書類 の こと で す 。 忘 
る 小学 校 の 生徒 が 自分 の クラ ス の 忘れ 物 を 1 れ 物 を な くす た め の 対 策 も 主要 な 忘れ 物 か ら 考 え 
か 月 間 に わ た っ て 調べ , その 結果 を 表 1 に まとめ ま て ゆけ ば 効果 が 大 きい と いう こと に な り ま す 。 パ 
し た 。 この よう な 調査 結果 は 棒グラフ に し て みる レー ト 図 の 考え 方 は 工場 や 事務 所 で よく 使わ れ , 
と その 様子 が よく わか り ま す 。 さ っ そく , その 棒 重点 指向 の 考え 方 と し て 普及 し て いま す 。 


グラ フ を 作る プロ グラ ム を 考え て み ま し ょ う 0 
ログ ラム を 見 る 前 に , 出来 上 が り の グラ フ を 見 て 田 棒 グラ フ を 作る プロ グラ ム 


下さ い ( 表 示 1 )。 品物 の 名 前 。 その 下 の 行 に 件 数 プロ グラ ム を 表示 2 に 示し ます 。 まず ,。 行 20 を 
分 の 長 さ に あたる 棒 と 件 数 が 印字 され て いま す 。 見 て 下さ い 。 行 20 は LET の 省略 され た let 文 で 
この よう な 仕事 を する プロ グラ ム は わり に 簡単 な 20 HS= 証 還 還 間 昌 昌 昌 間 間 間 間 間 還 昌 還 暗 ' 
も の で す 。 表示 1 の よう に 件 数 の 多い 順に 描い た と な っ て いま す 。 引 用 待 の 中 は グラ フィ ッ ク 文字 
棒グラフ を パレ ー ト 図 と いう こと も あり ます 。 パ の 較 が 30 個 並ん で いる の で す 。 こ の グラ フィ ッ ク 
レー ト 図 で は 主要 な 忘れ 物 が 一 目 で わか り ま す 。 文字 は , 隊 キー を 押し な が ら に 国 の キー を 押し ます 。 
第 1 の ショ ルイ ー 一 書類 一 一 と いう の は 父母 表 談 棒グラフ の 棒 は この HS の 記憶 する 文字 列 の 左 か 
表 1 忘れ 物 調 べ 表示 1 忘れ 物 調 べ 
品物 件 数 為 縛 ) 
RFP - 計 : 抽 者 区 
書 類 18 | 問 還 二 め 
ノー ト 
し ーー 、 11 
| 計 昌 り M 
教科 書 8 キョ ウ カ ショ 
| 。 上陸 4 導 必 
価 題 5 シュ クタ * イ 
人 箱 ト 間 | 上 s め の 
テ “ ババ" コ 
体育 着 2 | 還 c 地 My 
タイ イク キ “* 
Ms ま 還 較 2 ケン 
で し ソノ タ 
| 隊 c 吉 M 


48 


表示 2 プロ グラ ム P9-1 忘れ 物 調 べ 


10 REM P9-1 八 " レ ー ト (1 ) 


20 H ま =" 
30 READ N$,K 
40 IF N$="//" THEN 120 


50 PRINT N$ 

60 6G*$=LEFT ま (H ま 。K ) 

70 PRINT TAB(5) 6*jKi 
80 GOTO 30 


ケン 山 


110 DATA ソノ タ ,3,//,0 
120 END 


ら 必 要 な 個数 を と っ て き て , それ を 印字 すれ ば よ 
い の で す 。 プ ログ ラム の 行 60 と 70 で それ を し て い 


行 60 の 

60 G ま =LEFT ま (H ま ,K ) 

で は , その 右辺 の LEFT$ が H$ の 内 容 で ある 文字 
列 か ら 左 側 K 個 分 一 一 K の 値 が 18 な ら 18 個 一 一 を 
と り 出 す 働 き を し て , その 結果 を G$ に 代入 し て 
いま す 。 行 70 の TAB(5) の 働き は 図 1 で 見 て 下さ 


ます 。 


い 。 


PR ER EARB8O25IOAAGI も 2 お) ググ ロリ 


012345678 9101112131415 


図 1 TAB の 働き WS 


圏 プ ログ ラム P9-1 の 説明 


行 10 は 注釈 で す 。 

行 20 は H$ に グラ フィ ッ ク 文 字 較 が 30 個 並ん だ 
文字 列 を 作っ て お きま す 。 

行 30 は data 文 か ら 品 物 の 名 前 を N$ に , 件 数 を K 
に 読み 込み ます 。 行 30 か ら 行 80 で ルー プ を 構成 し 
て いま す 。 

行 40 は デー タ の 終り を 判定 し て ルー プ か ら の 脱 
出 を 行う 下 -then 文 で す 。 

行 50 は 品物 の 名 前 を 印字 し ます 。 


90 DATA ショ ルイ ,18, ノ ソート, 11 , キ ョ ウ カ ショ , 
100 DATA シュ クタ " イ 。5。 フ テ * 人 " コ 。3。 タ イイ クキ " 。2 


0 ク 


行 60 で は , H$ か ら 左 の K 個 分 の 文字 列 を と り 出 
し て G$ に 代入 し ます 。 


行 70 で は 画面 の 左 か ら 5 桁 の 空 折 を と っ て ., 
G$ 一 一 棒グラフ の 棒 一 一 と K 一 一 件 数 一 一 を 印字 
し ます 。 


行 80 は , 行 30 へ 戻る こと を 命令 する goto 文 で す 。 
行 90 一 110 は data 文 で , 最後 に 斜線 プア と ゼロ を 
入れ て いま す 。 その ゼロ は どん な 値 で も よい の で 
が , 行 30 の read 文 で N$ と K に 二 を 読み 込む 
の で , それ に 合わ せ て いる の で す 。 

行 120 は プロ グラ ム の 終り を 示す end 文 で す 。 
この プロ グラ ム に 出 て きた 新しい 機能 を まとめ 
MG を ュー Ep だ 
LEFT$ や の 働き 
LERTEC レ アド ) 
eeemey | 

LEFTS(AS, N) 

の 形 で , A$ の 記憶 し て いる 文字 列 の 左側 か ら N 
文字 を と り 出 し ます 。 
10 A*='ABCDEF' 

20 PRINT LEFT ま (A ま 。2 ) 


run 
AB 


- つ の 値 を 


は 英語 の 左 と いう 意味 で す 。 


この 例 の よう に print 文 の 中 に 直接 LEFTS を 使 
うこ と も で きま すか ら , プロ グラ ム P9-1 の 行 
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60 を 削除 し て , 行 70 の G$ を LEFTS (H$, K) と 
書き 替え て も か まい ませ ん 。 

・LEFTS$ (A$, N) で 、N の 値 が ゼロ の と き , 結果 
は 空 の 文字 列 一 一 何 も な い 長 さ ゼ ロ の 文字 列 一 
が 作ら れ ま す 。 プロ グラ ム P9-1 で 
場合 、 棒 の 印字 が 無く 、 0 ケン 


FK が ゼロ の 

と 印字 され る で 
0 の 

TAB(N): の 働き 

・TAB は タブ と 読み ます (タイ プラ イタ の 印字 位 


置 の 設定 の 機能 に 由来 し て いま す 。TAB は table 


( 表 ) と か tabulation ( 作 表 ) 
文字 を と っ た も の で す )。 


と いう 英語 の 頭 の 3 


LEFT 市 CA や , 内 ) 


左 か 5N 個 52 


表示 3 プロ グラ ム P9-2 


REM _P9-2 八 ツ "レー ト (2) 
READ N$ ま ,K 
IF N ま ="//" THEN 120 
PRINT N ま 
PRINT TAB(S)} 
FOR 1=1 TO K 
PRINT 較 : 
NEXT I 
PRINT Ki サン" 
80 GOTO 30 


・print 文 の 中 で ,。 セミ コロ ン : を 伴っ て 使わ れ ま 
す 。 印字 位置 を 行 の 左 か ら N 桁 飛ば し た 次 へ も 
っ て ゆく 働き を し ます 。 


較 別 の 棒 の 引き 方 


棒グラフ の 棒 の 引き 方 と し て , よく 使わ れ て い 
る の は 

72 FOR 1=1 TO K 

74 PRINT "大 ': 

76 NEXT I 
ど W う 形 の プロ グラ ム で す 。 て これ を 重 っ て プ 豆 多 
ラム P9-1 を 直し た プロ グラ ム P9-2 を 表示 3 で 
見 て 下さ い 。 FOR か ら 始 まる 文 は for 文 と いわ 
れ 。 央 切な 交 の つ で す 。 (こさ で の デー タ で は 
二 つ の プロ グラ ム の 結果 は 完全 に 同じ で す 。 し か 
し , K の 値 が ゼロ に な る よう な デー タ の と き , 機 
種 に よっ て , 一 つの 田 を 印字 し て し まう こと が あ 
り ま す 。) for 文 の 働き は 次 の プロ グラ ム で 説明 し ま 
し ょ う 。 


圏 プ ログ ラム P9-3 の 説明 


表示 4 の プロ グラ ム P9-3 は , その 結果 は プロ グ 
ラム P9-1 と 変わ り ま せん が , ル ー プ の 構成 の 仕方 
が 異な り ま す 。 主 要 な 行 に つい て 説明 し て お きま す 。 


20 DATA ショ ルイ ,18。, ノ ー ト , 1 1 , キ ョ ウ カ ショ 。 ア 

100 DATA シュ クタ * イ 。5。 フ テ “ ハ " ゴ 。3。 タ イイ クキ “ 。2 
110 DATA ツノ タ ,3,//,0 
120 END 


表示 4 プロ グラ ム P9-3 


10 REM P2-3 八 * レ ー ト (3) 
ノ |) 中 - 半量 9 和 BROSRGRE 人 ま 和 7 
25 READ N 

30 FOR 1=1 TO N 

40 READ N ま ,K 

50 PRINT N$ 

60 。G ま =LEFT ま (H ま も,K ) 

70 PRINT TAB(5) 36 ま 3Kj "ケン" 

80 NEXT I 

85 DATA 7 

90 DATA ショ ルイ ,18, ノ ー ト ,。 1 1 , キ ョ ウ カ ショ 。 

100 DATA ミュ クタ " イ ,5。 フ テ * 八 " コ 。3。 タ イイ クキ " 。2 
110 DATA ソノタ,3。//。0 

120 END 


Na 旨 


行 30 の 第 1 回 目 の 実行 第 2 回 目 第 3 回 目 第 4 回 目 
記憶 装置 


30 FOR I=1 TO 3 


30 FOR !=1 TO 3 30 FOR !=1 TO0 3 30 FOR =1 TO 3 


mo 


普通 は 1 の 値 は 
4 に な っ て いる 


表示 5 for 文 


行 25 は 、 棒 グラ フ の 品物 の 種類 一 一 こ の 場合 は 


*・ そ の 他 " を 入れ て 7 種 一 一 を N に 読み 込み ます 。 30 for ij=1 to 3 


40 print 1i 


行 30 は , 今回 の ポイ ント の for 文 で す 。 行 80 本 1 
と 対 に な っ て , 行 30 と 行 80 の 間 に あ る 文 を 反復 実 90 print ルーフ" オ ワ ウリ” 
行 す る こと を 指示 し て いま す 。 4 

RORI 光 本 MNO 人 N ク 2 
を 日 本 語 で いえ ば, 変数 1 を 1 か ら N ま で (1 ず 3 

8 3 ルー フ ? オ 9 リ 

つ 増 し な が ら ) 以下 を 実行 せよ と いう こと で す 。 0k 
行 80 の 

NEXT 1 
は 次 の も (に に つまり, 行 30 に 戻 つ て 次 の に 進 
め と いう こと で す 。 図 2 で の 説明 と 表示 5 を 見 て 
ト さ い 

Ne 店 
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い 。 ま た, 横 の 見 出し に 使っ て いる N$ に 入る 文字 


圏 ヒ スト グラ ム SS 
列 の 長 さ は 5 文字 まで と し て あり ます の で 。, data 
表示 6 は ある 中 学 で の 数 学 の 試験 得点 の 分 布 で 文 を 別 の も の に 変え る と き に は 注意 し て 下さ い 。 
す 。 プロ グラ ム は 表示 7 の P9-4 で す 。 行 60 の 最 この よう な 棒グラフ を ヒス ト グ ラ ム (柱状 図 ) と 
後に セミ コロ ン が 付い て いる こと に 注意 し て 下さ も いい ます 


表示 6 試験 得点 の 分 布 


失 


表示 7 プロ グラ ム P9-4 


コイ 


よ O 机 E 科 や サ ニー4、 ヒス トク ” ラム 

1 00RRSRDS2ERENRSNS 和 RS 英生 
30 READ N 

40 FOR 1=1 TO N 

っ 0 READ N$,K 

60 PRINT _N$: 

70 、 G ま =LEFT ま (H ま 。K ) 

80 PRINT TAB(5) 6 ま #K 

20 NEXT 1 

100 DATA 17 

110 DATA 100,3,95-99 , 17,90-94 , 29 
120 DATA 85-89, 28, 80-84 , 25, 7?5-79, 18 
130 DATA 70-74,24 , 65-69, 13 , 60-64 , 1 ア 
140 DATA 55-59,?,50-54 ,5,45-49, 7 
150 DATA 40-44,2,35-39, 3, 30-34 , 3 
160 DATA 25-29,1," -24"。1 

170 END 


0 4 
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ーーーーーーーーーー+ 革 イシ トー ーー 一 


for 文 に よる 繰り 返し の 指示 が 今回 の 大 切な と こ 
ろ で す 。 これから 。 for 文 を よく 使い ます 。 だ ん だ 
ん と その 上 手 な 使い 方 に な れ て 下さ い 。 
①for 文 

for 文 は next 文 と 対 で 使わ れ ま す 。 

FOR: ホー to N 


NEXTT 1 
と いう 形 が 出 て きま し た 。FOR の あと の 変数 1 と 
NEXT の 次 の 1 は 同じ 変数 名 を 使い ます 。 変数 の 


名 前 は 適当 に 変え られ ます 。 も っ と 一 般 的 な 使い 
方 は これ か ら 出 て きた と ころ で 説明 し ます 。 
② 棒 グラ フ 

LEFT$ や TAB を 使っ て , 棒グラフ を 簡単 に 
作れ ます 。 画面 の 大 き さ が 限ら れ て いま すか ら , 
デー タ の 中 の 件 数 (度数 ) が 大 きい 数 に な る と き 
は , 画面 の 1 文字 で 1 件 で な く , 1 文字 で 5 件 分 
を 表す , と いう よう に 工夫 する こと も 必要 に な る 
で し ょ う 。 第 11 回 で 再び グラ フ の 書き 方 を 扱い ます 。 


WE ーー ニー ピン ーー 


① N を いろ いろ に 変え て 
S =1 十 2 十 … 十 N 
の よう に , 1 から N ま で の 和 を 求め る プロ グラ ム 
作っ て 下さ い 。 石ころ を 図 3 の よう に 並べ た と 
き の 石 ころ の 総数 を 求め る こと に な り ま す 。 


[の 4 や 5, 


(6 4 も は の と 
図 3 石 並べ 


表示 8 


人 まけ. EK PE2 
20 FOR IT=0 TO 11 


40 NEXT 1 
50 END 


30 PRINT LEFT*$( "ABCDEFGHIJK "1 ) 


④ 表示 8 の プロ グラ ム を 実行 し て みて 下さ い 。 
③ プロ グラ ム P9-4 で 70 点 以上 (表示 6 の は じ 
50 一 69 点 の 棒 に 慕 、 それ 
博 昌 は カラ 


め の 7 行 ) の 棒 に 青 , 
以下 に 赤 の 色 を つけ て みて 下さ い 。 
一 頁 (83 頁 ) に あり ます 。 


表示 9 P9E2 の 実行 結果 


何で 届 


1 

AB 

ABC 

ABCD 

ABCDE 
ABCDEF 
ABCDEFG 
ABCDEFGH 
ABCDEFGHI 
ABCDEFGHI J 
ABCDEFGHI JK 


Ok 
My 上 
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O 比率 で くら べ る 


放送 日 12 有 8 日 ( 水 ) 倫 再 放送 日 12 月 12 日 (日 ) 


プロ 野球 の チー ム 成 績 は 勝率 で , 打撃 10 傑 は 打率 で 順位 を 決め ます 。 前 
回 の 忘れ 物 調べ で は 品物 別 の 割合 を 求め て くら べ る と よい で し ょ う 。 比率 
や 割合 で くら べ る こと は デー タ の 見 方 の 一 つの 基本 で す 。 今 回 は 表 の 中 に 
GHOST 1 緒 EN 店 


表 2 桃 の 主 な 生産 県 と 
較 表 の 例 表 1 忘れ 物 調べ と れ 高 (1980 年 ) 
品物 件 数 比率 上 


比率 を 含む 表 の 例 を 表 1 か ら 表 4 で 見 て 下さ い 。 書 類 18 36.7 


梨 7.5 30.6 

表 1 の 忘れ 物 調 べ や 表 2 の 桃 の 主 な 生産 県 と と れ VM か 杭 : 四 52 212 
高 は 。 デー タ の 総計 に 対す る 各 デ ー タ の 比率 を 求 宿 題 5 10.2 長 野 4.1 16.7 
シン 筆 箱 3 6.1 電 贅 滞 2:6 10.6 
か Ne 体育 着 2 4.1 岡 山 0.8 3.3 
は 選手 ざと 一 一生 ぎ と 一 に の 自 。 る 60. その 季 .48.、 
打率 = 安打 数 打数 野人 旬 ーー ニー 全国 (24 で EE200 


表 4 の セ ・ リ ー グ 成績 の 率 は チー ム ご と に 


表 3 パ ・ リ ー グ 打撃 10 傑 1982-07-07 ま で 
率 三 勝ち 試合 数 /( 隊 ち 試合 数 十 負 け 試 合 数 ) 


打率 打数 安打 打点 


で 計算 され て いま す 。 ⑰① 落 合 ( ロ ) .335 245 82 48 
本 い 1 BE UN 柏 原 (日 ) .330 267 88 41 

この よう に 表 の 中 の デー タ は , 基本 と な る デー 人 A 5 ha 0 、 
タ と 計算 で 求め られ る デー タ が あり ます 。 計 算 に ④ 新 井 ( 南 ) .316 209 66 20 


⑤⑮ 河 圧 ( 南 ) .314 283 89 16 


は いろ いろ な 場合 が あり ます が , 多く の 表 を 分 析 ⑥ ク ルー ズ ( 日 ) .312 269 84 36 
(⑦ ぇ ティ -7( 西 ) .308 240 74 21 
し て みる と いく つか の パタ ー ン に まとめ られ ます 。 ⑧ 大 。 田 ( 西 ) .307 202 62 40 
5 2 ュ ーー を ⑲⑨ 箋 田 ( 急 ) .3007 256 77 38 
7 回 は 比率 を 求め る 計算 を 含む 作 表 の プロ グラ ム ⑩ 福 本 ( 急 ) .3007 266 8g0 34 
を と りあ げ ま す 。 - 
表 4 セ ・ リ ー ク 成績 1982-07-07 ま で 
較 処 理 手順 “ | | 
試 勝 敗 分 率 | 
マイ コン を 利用 し て 表 を 作り 出す 一 般 的 な 処理 忠 。 日 | 65 31..3245" 10 5564 | 
巨 人 73 36 28 9 .563 | 
手順 は Si 動 、J67 ! 34 も 27-『 6 3557 
5 SERE 阪 神 69 33 30 6 .524 
* | デー タ の 読み 込み | 大 洋 6 30 30 7 50 | 
@ | 計算 の 処理 ヤク ルト 67 18 43 6 .295 


と 考え る こと が で きま す 。 表 に よっ て 多少 の 違い て も 同じ よう に 書け る こと が わか る で し ょ う 。 
が あっ て も , 処理 手順 を この よう に と ら え て お く 忘れ 物 調べ 作 表 手順 


こと が 大 切 で す 。 表 1 に つい て も う 少 し 詳し く 考 


えて み ま し ょ う 。 表 2 か ら 表 4 の 処理 手順 に つい |@ 品物 名 と 件 数 の デー タ を 読み 込む 。 
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@ 総 件 数 を 求め る 。 
@ 品物 ご と に 比率 (2 
比率 = 件 数 一 総 件 数 メ 100 
で 求め る 。 
の 画面 表示 
@ 表題 と 表 の 上 の 見 出し を 印字 する 。 
@ すべ て の 品物 に つい て , 品物 名 , 件 数 , 比率 を 
印字 する 。 
合計 の 行 を 印字 する 。 


一 配列 の 利用 


この 処理 手順 の プロ グラ ム を 書く と き , 配列 と 
よ ば れる 変数 を 使う と 便利 で す 。 配列 (array ) と 
いう の は 、 一 つなが り の 記憶 場所 に 共通 の 名 前 を 
付け た も の で す 。 その うち の 一 つ 一 つの 記憶 場所 
は , 配列 の 名 に 番号 一 一 添字 一 を 付け て 表し ま 
す 。 例 えば , 表 1 の 品物 名 と 件 数 は 図 1 の よう に 
配列 に 記憶 され ます 。 図 1 で は 品物 名 に N$, 件 数 に 
X と いう 配列 を 使い ,N$(1) に "ショ ルイ ” と いう 文 
字 列 を , X(1) に 18 と いう 数 を 読み 込ん で 記憶 さ 
せる と いう 具合 で す 。 も し , 1 と いう 変数 が 3 と 
いう 値 を と れ ば , X(I) は X(3) を 指す こと に な り 
ます 。 配列 の 番号 は ゼロ か ら も 使え ます が , 図 1 
で は 1 番 か ら 使 用 し て いま す 。 な お , 配列 の 一 つ 
ーー つの 記憶 場所 を 要素 と いい ます 。 


配列 N$ 


N$(6) 


N$(7)| 、 
品物 名 を 入れ る 
図 1 配列 の 例 


件 数 を 入れ る 


較 プ ログ ラム P10-1 の 説明 


忘れ 物 調べ の 表 1 を 作る プロ グラ ム P 10-1 を 表 
示 1 で 見 て 下さ い 。 

行 20 は 配列 N$ と X, お よび 比率 を 記憶 する た め 
の 配列 P の 大 き さ 寸法 を 宣言 し て いる 
dm 文 で す 。 配 列 を 使う と き は dim 文 を 使っ て そ 
の 名 前 と 寸法 を 指定 し て お きま す 。 

行 30 は デー タ の 組 数 を N に 読み 込み ます 。 

行 40 は N$(1) と X(1) か ら 順 に N$( N ) と X(N) 
まで デー タ を 読み 込み ます 。 

行 50 は X(1) か ら X(N) の 合計 を 求め て 記憶 す 
る 変数 S の 値 を ゼロ に する 前 処理 で す 。 

行 60 は その S を 求め ます 。 

行 70 は X の 各 要 素 を S で 割っ て 100 を 掛け , パー 
セン ト を 計算 し て 配列 に 入れ ます 。 

行 80 と 90 は 表題 と 表 の 上 の 見 出し を 印字 し て い 
ます 。 

行 100 か ら 130 は N 行 分 の 表 の 中 身 を 印字 し て い 
ま :935 

行 140 は 合計 の 行 を 印字 し ます 。 

行 150 か ら は デー タ が 並ん で いま す 。 最 初 の 7 は 
以下 の デー タ が 7 組 あ る こと を 示し , 変数 N の 値 
と な り ま す 。 

プロ グラ ム P10-1 の 実行 結果 を 表示 2 に 示し て 
お 溢 手 9: 


比率 を 入れ る 
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表示 1 プロ グラ ム P10-1 忘れ 物 調 べ 


10 REM P10-1 
20 DIM N ま (15) ,X(15) ,P(15) 

30 READ N 
40 FOR 1I=1 TO N:READ N$(I),X(1):NEXT I テーク の みみ 
50 S=0O 

60 FOR 1=1 TO NzS=S+X( 1 ):NEXT 1 計算 の 処理 

70 FOR 1=1 TO N:P(1)=X(1I)/Sx100:NEXT 1 

80 PRINT ' 9 ス レモ も モノ シラ A"" :PRINT 

90 PRINT "コウ モク サン ス 9 ヒ リ リ %" 

100 FOR I=1 TO N 


110 PRINT N ま (IT):TAB(6) :X(1) 表 の 画面 表示 
120 PRINT TAB(11 ) :P( 1 ) 
130 NEXT I 
140 PRINT " コ " ウ ケイ "SsTAB(11)1" ーーー 
150 DATA ァ 7 
160 DATA ショ ルイ 。 18 ノート, 1 1 。 キ ョ ウ カ ショ , デー タ 
170 DATA ラ ュ クタ " イ ,5, フ テ " 人 " コ 。 3 , タ イイ クキ " 。2 
180 DATA ソノ タ ,3 
表示 2 プロ グラ ム P10-1 の 実行 結果 ・ 添 字 の 値 の 最小 は ゼロ で す 。 最 大 値 は 一 般 に dm 
で 宣言 で 宣言 し な く て も 添字 
ワリス レモ ノ シラ A ヾ 文 で 富 言 し ます (dim 文 で 宣言 し な く て も 添 和 
の 最大 値 が 10 ま で な ら 配 列 を 使用 で きま す )。 
コウ モク ケン スウ ヒ リ ツ シ 四則 演算 
ショ ルイ 18 36 。734? 3 ュ ea で 
ノー ト 22 。449 ・ プ ログ ラム の 中 で の 足し 算 , 引き 算 , 掛け 算 , 
キョ ウ カ ショ 7 14.285? 割り 算 の 記号 と し て 、 それ ぞ れ 
シュ クタ " イ 5 10 .2041 1 
ファ “AA" コ 3 6。12245 
イタ クギ” フス 4 .08163 が 使わ れ ま す 。 掛け 算 は ぶ が 英字 の エッ クス と 
kr Bo 6・12245 間違い や すい の で 星 印 を 使い ます 。 ま た 。 割 
0 Re り 算 に 斜線 プ を 使う の は , キー ボー ド の キー の 
種類 や 文字 記号 の 種類 を ふ や さ な いた め に を 
採用 し な い の が コン ピュ ー タ で は 普通 に な っ て 
dim 文 いる か ら で し ょ う 。 こ の 記号 の 違い の ほか は カ 
・ デ ィ ム と 読み ます 。 英語 の dimension ( ディ メン ッ コ ( ) を 含め て 数 学 で の 習慣 と 同じ よう に 式 
ショ ン , 寸法 と か 次 元 と いう 意味 ) に 由来 し ま を 書く こと が で きま す 。 
3 ら 
・ 使 用 する 配列 の 名 前 と その 寸法 (添字 の 値 の 上 圏 プ ログ ラム P10-2, 10-3, 10-4 
限 ) を 宜 詩 し ます 。 表 2,3,4 の た め の プ ログ ラム と その 実行 結果 
・ 一 般 に を 表示 3 か ら 表 示 8 に 示し て お きま す 。 も う 特 列 
DIM 配列 名 (寸法 ),… な 説明 は いら な いと 思い ます 。 プ ログ ラム を 読む 
と いう 形 を し て いま す 。 練習 を し て 下さ い 。 
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表示 3 
「 io REM P10-2 プロ グラ ム P10-2 
20 DIM N ま (15),X(15) ,P(15) 
30 READ N 
40 FOR 1=1 TO NzREAD N$(1),X(1):NEXT 1 
50 S=0 
60 FOR 1=1 TO Nz:S=S+X( 1 ) :NEXT 1 
ィ 0 FOR 1=1 TO NzP(1)=X( 1 )/SX100:NEXT 1I 
80 PRINT "モモ / オモ ナ セイ サン サン "sPRINT 
20 PRINT | サン トレ タ " カ ヒ リ ツ %“ 
100 FOR 1=1 TO N 
110 PRINT N$ ま (1I)jTAB(6)sX(1)5 
120 PRINT TAB(11)jPK(1) 
130 NEXT I 
140 PRINT "も セ " ン コク "3SiTAB(11)j100 
150 DATA 6 
160 DATA ヤマ ナシ ,7 了 5, フク ラマ, 5 。 2 ナカ" ノ 。4 。1 
3 DATA マカ " タ ,。 2 。6 オカ ヤマ , 0 .8 ソノタ 。4 。3 


表示 4 


モモ  / オモ ナ セイ サン ケン プロ グラ ム P10-2 の 実行 


結果 
ケン トレ タ " カ ヒ リ ツ シ 
ヤマ ナシ 9606 よ ク の 
フク シマ クキ ミク クツ 4 ら 5 
か 4。1 16。734? 
ヤマ カタ 26 10。 る 6122 
オカ ヤマ 。8 3 .26531 
ソノ タ 9 生 が 9 らん 4 
セ *" ンコ ク 

表示 5 

10 REM P10-3 プロ グラ ム P10-3 
20 DIM N$(30 ) ,D(30 ) , A(30 ) , R( 30 ) 


30 READ N 
40 FOR !=1 TO N 
50 READ N ま (1),D(I),A(1) 


60 NEXT 1{ 

70 FOR 1=1 TO NiP(1)=A(1)/D( 1):NEXT 1 

80 PRINT AA?・ リ ー ク "タタ" ケ * キ 10 ケ 79" 

90 PRINT 『 1982-07-07 マテ *“ 
100 PRINT ピー し て 
110 FOR 1=1 TO N 

120 PRINT IiN*$(1):TAB(10)jP(I)} 

130 PRINT DCTI)j:A(1) 

140 NEXT 1I 

150 DATA 10 


160 DATA オチ アイ 。 245,82, カ シ 9 ハ " ラ ,267,88 
170 DATA クリ ルッ, 191 62, ア ライ 。 209,66 
180 DATA コ オ /。 283 , 89 , ク ルー ス “ 。 269。84 
190 DATA ステ ィ ー フ " ,240,74 。 オ オタ 。 202 , 62 
200 DATA ミノ タ " 。 256,77, フ クモ ト ,。 266,80 
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表示 6 


プロ グラ ム P10-3 の 実行 結果 


一 家 を さき れい に 
2・ リ ー ク "タダ か" キ 10 か ツ 8 上 
1982-07-07 マテ * 表示 2 の 表 の で き ば え に は 不満 の 人 も 多い で し 
リツ 2 ば 4 ょ う 。 表 の けい 線 を 入れ た り , 数 字 の けた の 位置 
1 オチ アイ .334694 4 1 2 
芝 カシ 7 リ 八 " ラ .329588 シア 4 88 を そろ えた り , バ パー や ギン ト の 数 字 の ト 数 点 以下 を 
3 クリ ハシ 。324607 191 6 る 2 1 けた に し た り し た いと いう 要求 は 当然 で す 。 そ 
4 アラ イ 315789 209 66 4 て い 5 プロ グラ ム P10-5 で 示 
5 コ ォ ノ 2 衣 衣 399 ーー で の /ー ク フ ム T10. お で す ( 王 9) 
6 クー ス * 。312268 269 84 print usmg 文 が 新しく 使わ れ て いま す 。 その 3 と 
7 ステ ィ ー フ " 308333 240 74 お り の 使い 方 を 説明 し て お きま す 。 
8 オオ タ 。3069231 202 62 
9 ミノ タ * .300781 256 77 | Print using 文 
10 フク モト 300752 266 80 ・ プ リン ト ユ ー ジ ング と 読み ます 。 
2 ノ 。 ・ pnt using ' &" Ns 
表示 7 プロ グラ ム P10-4 
YA 
10 REM P10-4 
20 READ N 
30 FOR 1I=1 TO N 
40 READ N ま (1 ),S( 1 )。K( 1) ,M( 1 ) 
50  T=K( 1 )+M( { ) : UM( 1 )=S( 1 )- 和 TP( 1 )=K( T )/T 
60 NEXT 1 
70 PRINT セ も ・ リ ー ク " 。 セ イセキ” 
80 PRINT 1982-0 ア ー07 ア マチ" 「『 
20 PRINT アイ カチ マ ケ りか リツ ” 
100 FOR 1=1 TO N 
110 PRINT N$(1)jTAB(6)5S( 1 ) :K(1I) 
120 PRINT MI ):UM( 1 )jP( 1 ) 
130 NEXT I 
140 DATA 6 
150 DATA チュ 9 ニチ 。65,31 。24 。 キ ョ ミン, 73。36。 28 
160 DATA ヒロ シマ , 67,34 ,27。 ハ ン ミ シン 。 6②9, 33。30 
170 DATA タイ ヨウ ,。 67,30 , 30 ヤク ルト,。 67。18。43 
に 4 
表示 8 プロ グラ ム P10-4 の 実行 結果 
9 
セ ・ リ ー ク “セイ セキ 
1982-07ー0 7 マテ * 
の 0 の 3 アル リツ 
の りら SE よー 06SS ま 563636 
EEC の ES きら ドー の ou2ds0 の の の 
ヒロ シマ GO)234 の ン / 6 85Z37 ア 7 
ハツ シッ ON33 30 Ge の 298 ル 
タイ ヨウ (<WGKe 導 2G18 也 析 失 C]0 E8R2726E 
ヤク ルト 67 (18.、43..6 295082 
いさ 4 
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print using の すぐ 右 の 文字 列 (また は 文字 列 変 
数 ) が 印字 の 形式 (書式 ) を 指定 し ます 。 "& ご 
ロロ 呈 科 "の 場合 。 中 の 空白 4 けた を 人 入 ん で 6 け 
た の 印字 欄 を と っ て , : 以下 の 文字 変数 を 左 に 礎 
せ て 印字 し ます 。 一般 に 必 (アン ド 記 号 ) の 間 に 
n け た の 空 向 が ある と ,。 N$ の 文字 列 の 長 さ が n 
寺 2 より 短けれ ば 印字 欄 の 右 に 空白 が つま り , n 
+ 2 より 長け れ ば N$ の 文字 列 が 左 か ら n 填 2 写 
で 切ら れ て 印字 され ます 。 も し , N$ の 先頭 の 1 
文字 だ け 印 字 し た けれ ば 

print usimg "1) ji NS 
と 書き ます 。 


が と られ , X メ と Y の 整数 部 分 が 右寄せ で 印字 され 

に dg 

・ print using " 壮 半 振 . 半 | XY 
これ は , 整数 部 3 けた と 小数 点 、 お よび 小数 点 

以下 1 けた の 形 で X と Y の 値 が 印字 され ます 。 小 

数 点 第 2 位 で 四捨五入 され ます 。 

・print using 文 は 上 の 例 の よう に 「 指 定 する 形式 
を 用 いて : の 右 の 並び の 値 を 印字 せよ 」 と いう 
命令 で す 。 文字 列 と 数 値 に は 別々 の 書式 が 指定 
され ます 。 

・print usimng 文 の 使い 方 は それぞれ の 機種 に よ 
っ て も 違い ます 。 くわ し い 使 い 方 は それ ぞ れ の 


・ print using 『 韻 韻 壮 半 寺 )XJY 機種 の 説明 書 を 見 て 下さ い 。 


これ は 革 の 数 の 分 一 一 この 場合 5 一 一 の 印字 欄 


95 表示:9 
人 REM P10-5 プロ グラ ム P10-5 
20 DIM N ま (15),X(15) ,P(15) 
ON 抽 二 証 : 二 で の 人 コミ ーーー 
40 READ N 
50 FOR 1=1 TO Ni READ N ま ( 1) ,X(1I):NEXT I 
60 JREM ーー ケイ サン ーーー 
70 S=0 
80 FOR 1=1 TO NzS=S+X( 1 ):NEXT 1 
20 FOR 1=1 TO NzP(1I)=X( 1 )/S%100:NEXT 1 
人 還 本 結 陸 ホーー も すき サ ター マー 


110 PRINT 『 レル (yo 
120. PRTNT 

まき は) 絞 民 時 . コウ モク ケン スウ ヒ リ ツ %“ 
140 PRINT 


150 FOR 1=1 TO N 
160 PRINT USING'& &「 jiN ま (1 )5 
170 PRINT USING” hi 人 3X(1)5 


180 PRINT USING 「 村 柱 析 拉 。 間 「LP(T) 
190 NEXT 1I 

200 PRINT "一 一 ーーーーーーーーーー" 
210. PR ココ"99 イ 7 5 

220 PRINT USING " 析 拉 昔 梓 「353 

230 PRINT 100" 

240 "PRINT ニーーーーーーーーーー リ ーー 
250 DATA 7 


260 DATA ラ ョ ルイ ,18, ノ ー ト ,。1 1 , キ ョ ウ カ ショ 。 
270 DATA ラ ュ クタ トイ , 5 。 フ デア "AA コタ イイ の キ 2 
280 DATA ソノタ,3 
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プロ グラ ム P10-5 の 実行 例 を 表示 10 に 示し て お 表示 10 プロ グラ ム P10-5 の 実行 結果 
きま す 。 こ こ で は こん な こと も 可能 で ある こと を 
見 て 頂く こと が 目的 で す の で , あま りこ ま か い こ 
と は も う 少 し 先 に 進ん で か ら 学 びましょう 。 


4 ルル モノ / ラプ 
コウ モク ケン スウ 9 ヒ リ ツ を 


に 9 
アタ AN に ] 6,1 
タイ イク キ " 2 4 。 

ゾ ヅ ゾ タ き 3 6 


コ " ウケ イ 


ーー 一 + 基 イシ トー ーーーーーーーーーー 一 


ー つ な が り の 記憶 場所 を 配列 と し て 使用 し て , (プロ グラ ム の 処理 手順 

比率 を 含む 表 を 作っ て み ま し た 。 処理 手順 を 機能 別に 大 きく わけ て と ら え る こ 

(①for 文 と が 大 切 で す 。 読み 込み , 計算 , 表示 は 典型 的 な 
今回 は for 文 の 標準 的 な 使い 方 に 慣れ る こと 手順 で す 。 こ の ほか , デー タ の チェ ッ ク や デー タ 
が ポイ ント で す 。 の 修正 の 機能 が 実用 的 な プロ グラ ム で 必要 と な り 

E 名 
ーーーーーーーーーーー ャ や っ て みよ うー ーーーーーー ーー 

① プロ グラ ム P10-2 か ら P10-4 を 読ん で 理解 し 接 に 並べ る こと も で きま す 。 こ の と き 。, 文字 列 
て 下さ い 。 は 引用 待 で くく り ま す 。 

⑧ 表示 11 の プロ グラ ム を 実行 し て みて 下さ い 。 ⑧③ プロ グラ ム P10-2 か ら P10-4 を P10-5 に な ら 
結果 は 表示 12 の よう に な り ま す 。 この よう に っ て , きれ いな 表 が 印字 され る よう に 直し て 下 
print 文 や print using 文 に は 文字 列 や 数 値 を 直 さい 。 


10 PRINT USING &  &'』 ABCD" 』"EFG" 
20 PRINT USING 「 欄 柱 柏 "』24。15,17 
30 PRINT USING 「 析 柏 。 幕 310.32,5.64.5.66 


に un 
ABCDEFG 

ピス be 1 時 
ます "な 。 る 9 
0k 
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人 @ 放 送 日 12 月 15 日 ( 水 ) 
吐 


め 


LU 


移り 変わ り の グラ フ 


人 @ 再 放送 日 12 月 19 日 (日 ) 


昌 路 日 本 の 人 口 に 占め る 老人 の 割合 は 年 々 増加 し て いま す 。 その 移り 変わ り 
(rm を 見 る に は 。 デー タ を グラ ブフ 用 紙 に 打点 する と よい で し ょ う 。 和 気象 や 経済 
芝 上 | の デー タ も クラ フ に する と 、 そ の 次 化 の 傾向 が よく わか り ます 。 今回 は 

朋 表示 画面 を グラ フ 用 紙 に 見 立て て , グラ フ を 描く 練習 を し まし ょ う 。 


圏 画面 を グラ フ 用 紙 に 


表示 装置 の 画面 に 印字 で きる 横 の けた 数 と 縦 の 
行 数 に は 一 一 つま り , 画面 の 大 き さ に は 一 一 制限 
が あり ます 。 使用 する 画面 の 大 き さ は width 文 
で 指定 で きま す 。 ご ここ だ で は 

width 40, 25 

と し て ., 横 40 字 メ 縦 25 行 で 画面 を 使い まし ょ う 。 

画面 上 の 表示 は , 普通 は スク ロー ル さ れ て いま 
す 。 画 面 一 杯 に 印字 され る と , それ に 続く print 文 
で , 表示 が 上 に 巻き 上 げ ら れ て ゆく の で す 。 この 
働き を スク ロー リン グ と いい ます 。 その スク ロ 
ー ル され る 画面 の 範囲 は console 文 で 変更 する 
こと が で きま す 。 例 えば 


console 22.3 


固定 し , 第 22 行 か ら 3 行 分 が スク ロー ル さ れる 和男 


囲 と な り ま す 。( こ の 場合 、width 文 で , 画面 を 25 
行使 うこ と に し て いな いと , 意味 が あり ませ ん 。) 
な お , width 文 と console 文 の 使い 方 は 、 テキ スト 
の 第 2 回 で も 説明 し て あり ます 。 

画面 上 の 文字 表示 の 位置 は 、 図 1 に が す よ うに , 
通常 は , 横 方 向 縦 方 向 と も 左上 の すみ か ら 付 けら 
れ だ OM の の と いう 番号 で 表 さ れ ま す 。( 将 
棋 の 棋譜 は 普通 右上 すみ か ら 横 に 1, 2, …, 9、 縦 
に 一 , 二 ,…, 光 と 番号 が ふら れ , 7 六 歩 な ど と いい 
ます ね 。) 画面 上 の 位置 は , 横 を 先 に し て ., (4, 3) と 
書け ば , 横 が 4, 縦 が 3 の 場所 を 表し ます 。 こ の 


* 印 は (4.3) の 位置 


図 1 表示 装置 の 画面 の 座標 (width 40,25 の 場合 ) 


よう な 表し 方 を 点 の 座標 と いい ます 。 番号 が ゼロ 
か ら は じ ま っ て いる こと に 注意 し て 下さ い 。 


圏 打点 の 練習 


ZEN2 の ASSPT9St を 使う で 。 画面 江 の : ダ ラグ に 
点 を 打つ 練習 を し まし ょ う 。 こ の プロ グラ ム を ロ 
ー ド (load) し て ., 実行 (run) する と , 表示 1 の よ 
うな けい 線 の 入っ た グラ ブフ 用紙 が 表示 され . 

ヨコ , タテ ? 
と た ず ね て きま す 。 こ の グラ ブフ 用 紙 は 縦横 と も 0 
か ら 20 の 目盛 で す ( 図 2 )。 そこ で , 点 を 打ち た い 位 
置 の 座標 を 入力 し て 下さ い 。 例 えば 
タテ 抽 製 軸 
と 入力 する と , グラ フ 上 の ( 8, 4 ) の 位置 , つ ま 
り 、 横 の 8, 縦 の 4 の 位置 に * 印 が 印字 され ます 。 


ヨ jS 


較 プ ログ ラム P11-1 の 説明 


次 に 打点 練習 用 の プロ グラ ム P11-1 を 見 て 下さ 
い ( 表示.2 )。 そ の 処理 手順 は 次 の よう に な っ て い 
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ます 。 カッ コ 内 の 数 字 は プロ グラ ム の 行 番号 を 示 
束 計 。 
プロ グラ ム P11-1 の 手順 


@ 画面 の 大 き さ と 40 メ 25 で 使う よう に 指示 (30 ) 
@ 画面 を いっ た ん 消去 する (40 )、 

@ | クラフ の けい 線 を 入れ る | (50 一 140) 

@ グ ラフ の 下 の 方 の 3 行 だ け を スク ロー ル の 範 
囲 と する (150 )。 

@ 入力 デー タ の ある 限り 

@ グラ フ 上 の 座標 で (X, Y ) の 値 を 入力 する 
(170)。 

@(X.Y) が 枠 内 か チェ ッ ク し , 枠外 な ら 知 
ら せ る (180 一 210, 240 ) 

@ 枠 内 な ら グ ラフ 上 の (X, Y) の 位置 に 時 
印 を 打つ (220)。 


グラ フ の けい 線 を 入れ る 


@ 横 の 見 出し と し て ,。 グラ フ の 第 0, 5,10,15, 
20 け た 目 に 番号 を つけ る (80)。 


@ 0 から 20 行 に つい て 以下 を 繰り 返す (90 一 140 ) 

@ もし, 行 番号 が 0, 5, 10, 15, 20 の (5 で 

割り 切れ る ) 番号 な ら , 横 の 見 出し と し て 

その 行 番号 を 印字 し , 続い て 文字 列 (グラ 
フィ ッ ク 文字 で り 

Ez ag ae こ ン  a 

を 印字 する (110 )。 


そう で な けれ ば , 文字 列 
NR 和夫 

を 印字 する (130 )。 (表示 1 を 見 て 下さ い 。) 

[その と き , グラ フ 用 紙上 の (0.0) の 位 

置 を 画面 の (8.1) と する 。] 

[ 品 は 空白 の 印 で す ] 


プロ グラ ム P11-1 の 主要 な 部 分 を 説明 し て お き 
明 MU2s5 

行 40 は 画面 を 消去 を する と き の 定 石 と し て 覚え 
て お いて 下さ い 。 
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@ 画 面 の 機能 キー の 字幕 は 出 な いよ うに する 60)。 


表示 1 画面 上 の グラ フ 用 紙 


※ は (8.4) の 位置 


0 2 の 3!4 90678 9:… 


は 


トニ キイ ゴー オー ナー オキ ミオ ーー トート ー ト ー ト ! は 


+ーー ゴ オー トー ビーー オ ーー ビオ 


*※ 印 は グラ フ 上 
(8, 4) の 位置 
も と も と の 画面 
で は (16., 5) 


1 5 . 符 | | | 


旧記 園 グラ フ の (0.0) は 
も と の (8.1) 


2 画面 の 座標 と グラ フ の 座標 


行 860 の TAB(8) は 横 の 見 出し 用 に グラ フ の 左側 
を 空け て いま す 。- 8 けた 空け た こと に 注意 し で お 
いて 下さ い 。 

行 100 で の 

Y MOD 5 く ラ 0 
は , Y を 5 で 割っ た と き の 余 り を Y MOD 5 で 求 
め 。 その 余り が 0 で な いと いう 条件 を 表し ます 。 
行 170 の 
LOCATE 0,25 


は , 画面 の 行 25 へ カー ソル を 移動 する こと を ーー 一 


表示 2 プロ グラ ム P11-1 


4 け 尽 選 許 お も 4ー1 
20 CONSOLE 0,25,0,1 
30 MIDTH 40,25 


40 PRINT CHR$(12): 90 
電導 生誕 Phremmーー ロ ーー トキ ャ ーー ドニー イキ 
60 B*='| | | | 


70 X$="0 e. 10 Le 和紀 


80 PRINT TAB(8)1X$ 
290 FOR Y=0 TO 20 


100 IF Y MOD 5<>0 THEN 130 
110 PRINT TAB(4)jYjiTAB(8 ) }』A ま 


120 GOTO 140 


130 PRINT TAB(8) 5:B$ Os 


140 NEXT Y 
150 CONSOLE 22,3 
eo 人 


170 LOCATE 0,25:INPUT ヨコ, タテ 5XY 


180 IF X<0 THEN 240 
190 IF X>20 THEN 240 
200 IF Y< く 0 THEN 240 
210 IF Y>20 THEN 240 


220 LOCATE X+8,Y+1:PRINT 「※ 


230 GOTO 160 
240 PRINT "79 ク ノッ ツ ト " 
250 GOTO 160 


一 画面 を 消去 


ー グ ラフ の けい 線 を 画 く 


グラ フ の 行 0、 5, 10, 15, 20 
の 5 で 割り 切れ る 番号 の 行 は A$ を 使う 
ーー その 他 の 行 は B$ を 使う 


TIP テー 


トー 打点 を 行う 


| 
は Moeot 8 も 2 ェ ッ ク す る 
| | グラ ブフ 用 紙 の (0.0) の 点 は 
*- も と の 画面 の (8.1) の 位置 に ある の で 
| 。 LOCATE X+8,Y+1 と し て ある 


| 
1 
| 


8 は 


カー ソル の 点 減 は あり ませ ん が 一 一 指示 し ます 。 
行 25 は 画面 の 下 で すか ら 画 面 を スク ロー ル (この 


プロ グラ ム で 行 22 か ら 3 行 分 が 範囲 ) さ せ , 最 下段 


を print 文 に よる 印字 や 入力 用 の ? の 印字 に 使う こ 
どき な り ま す 93 
行 220 は 星 印 を グラ フ に 打ち ます 。 
LOCATE X 十 8, Y+1 
の 8 と 1 は グラ フ の 原点 (0.0) が 画面 上 の (8、1) 
の 他 軒 に な っ て いる の で , グ ラフ 上 ( 欧 ,」 立 ) を 
画面 上 の 位置 に 計算 し な お し て いる の で す 。 


較 横 軸 の 上 下 を 変え る 


縦 軸 の 番号 付け は , 画面 の スク ロー ル の 方 向 に 
関し て は 自然 で す が , 人 間 が グラ フ を 見 る と き は 
その % 尼 添 を 3 才 放 し 2 ラリ アウ) の がら 0 中 の us 
と し た ほう が 便利 で す 。 プ ログ ラム P11-2( 表示 4 ) 


は 表示 3 の よう に 縦 軸 に 下 か ら 0 , 5,10, 15, 20 と 
見 出し を 付け た グラ フ 用 紙 を 使い ます 。 


表示 3 画面 上 の グラ ブフ 用紙 
( 横 軸 の 上 下 を 表示 1 と 変え て いる ) 


EN 
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表示 4 
プロ グラ ム P11-2 


RE 詩人 ト ー ズ 

CONSOLE 0,25,0,1 

MIDTH 40,25 

PRINT CHR ま (12)} 

A ま =“ 

B=” | | | | I 
X ま ='0 っ 10 っ 
FOR Y=0 TO 20 


PRINT TAB(4)j20-YiTAB(8 ) 3 も 


100 IF Y MOD 5 く >0 THEN 130 
110 

120 GOTO 140 

130 PRINT TAB(8)?B$ 

140 NEXT Y 


PRINT TAB(8) 1 X ま 

CONSOLE 22,3 

RE 絆 に 志 本 人 の 売 光孝 

LOCATE 0,25: INPUT ヨコ, タテ"5X。Y 
X=INT(X+。5):Y=INT(Y+。5) 

IF X<0 THEN 240 

IF X>20 THEN 240 

IF Y<0 THEN 240 

IF Y>20 THEN 240 


GOTO 160 
PRINT 
GOTO 160 


プロ グラ ム P11-2 は P11-1 と 次 の 行 で 異な る だ 

サ で す 。 

・P11-1 の 行 80 を 行 145 と する 。 

・ 行 110 の Y を 20 一 Y に よっ て 横 軸 の 見 出し を 逆 
に する 。 

・ 行 175 を 追加 する 。 入 力 さ れ た グラ フ の 座標 ( X, 
Y) の X と Y に 小数 点 以 下 の 端 数 が ある と き , 
四捨五入 し て 整数 化し て いま す 。 INT は カッ コ 
の 値 を 切り 捨て て 整数 に な お す 働 き を し ます 。 
0.5 を 足し て お く と INT(X 十 0.5) は X の 四 捨 五 
入 に な る わけ で す 。 

・ 行 220 の LOCATE 文 中 の Y を 20 一 Y に する 。 


圏 推移 グラ フ 
グラ フ を 描く の は 手 作 業 で も 工夫 が いる も の で 


す 。 それ は グラ フ 用 の プロ グラ ム を 書く と きも 同 
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LOCATE X+8,20-Y:iPRINT "※" 
が 4 


じ こ と で す 。 表示 5 の グラ フ は プロ グラ ム P11=3 
(表示 6 ) で 表示 し た も の で す 。 その プロ グラ ム pP 
11-3 の 概略 の 処理 手順 を 示し て お きま し ょ う 。 


@ | グラ フ の けい 線 を 入れ る | (P11-2 と 同じ )。 

@ 両 軸 の 目盛 を 決め る 。 こ こ で は 表示 11-3 の グ 
ラフ 用 紙 で の ( 0 , 0 ) と (20, 20) の 位置 を 実際 
の デー タ 上 で いく ら に する か を 決め , グラ フ 
の 1 単位 を デー タ の いく つ に 対応 させ る か を 
きめ る (170-200)。 

@ | データ を 読み 込み , 打点 する | (210 一 370 )。 

@ 軸 の 目盛 と 見 出し ( 軸 の 名 前 ) を 表示 する (380 
ー440 )。 

@ グラ フ の 題 を つけ る (450 一 470 )。 


以下 で プロ グラ ム の 主要 部 を 説明 し て お きま し 
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表示 5 
グラ フ 表 示 の 例 
(プロ グラ ム P11-3 の 実行 結果 ) 


0 た 
ロ 9 ミ * ン ノ 9 リア ァ イ ノ へ ンカ 


表示 6 プロ グラ ム P11-3 


490 DATA 1900,0,2000,20 グラ フ 上 の (0.0) と (20.20) に 対応 する デー タ 
500 DATA ※。11 ] 

510 DATA 1900,.5.4,1910.5.2,1920,5.3 

520 DATA 1930,4.8,1940,4.7,1950 4 .9 

530 DATA 1960,5.7,1970,7.1 ,1980 ,8.9 | amees 

540 DATA 1990,11.0,2000,14.3 

550 DATA // SB 
560 DATA 1900 1950 
570 DATA | 
600 DATA 『 1 
610 DATA W 
620 DATA 『 S 
630 DATA 
640 DATA 
650 DATA 
660 DATA 1 
670 DATA 
680 DATA 2 
620 DATA 『 リ 8 
700 DATA し 1 細 
ィ 10 DATA 
ィ 20 DATA "  (%) 0 
730 DATA 『 1 
ィ 740 DATA 寺 に 
750 DATA 『 | 
760 DATA 

ィ 770 DATA 

780 DATA 
7920 DATA 

800 DATA 『" 
810 DATA “ ロウ 9 シ " ン / 9 リア イ / ンカ" ニーーー グ ラフ の 類 


\、820 END 


行 10 一 480 は 次 頁 


ーーー ッ ネン " 


そ 


| 
山 | 


ト 一 縦 軸 見 出し 


あこ コー 


て 
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プロ グラ ム P11-3 


REM P11-3 
CONSOLE 0,25,0,1 
MIDTH 40,25 
PRINT CHR$(12)}』 
DIM Y ま (20 ) 
AA ま = キーーーー ト ーー オーーーーー ト ーーーーー ト 『 
B ま =" | | | | | 
光二 補 本 10 6 は 拓 
FOR Y=O TO 20 
IF Y MOD 5<>0 THEN 130 
PRINT TAB(4)j20-Y:TAB(8 )  A ま 
GOTO 140 
PRINT TAB(8) }:B$ 
NEXT Y 
PRINT TABK8) :X ま 
*REM -ーー シ " ク / メモ リ ーー 一 
READ X0,Y0O 
READ X1,Y1 
S1=(X1-X0 )/20 
S2=( Y1-Y0O )/20 
REM -ーー タ " テ ン ーー 
READ M ま :IF M ま ="//" THEN 380 
READ N 
FOR 1=1 TO N 
READ X,Y 
X=INT((X-X0 )/S1+ 5 ) 
Y=INT((Y-YO )/S2+。5) 
IF X<0 THEN 340 
IF X>20 THEN 340 
IF Y<0 THEN 340 
IF Y>20 THEN 340 
LOCATE X+8,20-Y:PRINT M$ ま 
GOTO 360 
CONSOLE 21,4:LOCATE 0,24 
PRINT "9 ク ノ ツ ソト"j1: "ハン" STOP 
NEXT I 
GOTO 220 
REM --- シラ" ク / ノ ミタ "シラ ーーー 
READ X ま ,Z ま 
LOCATE 0,21:PRINT X ま :PRINT Z$ 
FOR 1I=0 TO 20 
READ Y$(1 ) 
LOCATE 0,1:PRINT Y ま (1 ) 
NEXT 1 
READ D ま 
CONSOLE 24,1 
LOCATE 0,24:PRINT D ま 
GOTO 480 


行 170 二 200 で は , グラ フ の ( 0, 0 ) と (20, 20) を 
( X0, Y0) と (X1, Y1) に 対応 させ , S1 と S2 に そ 
れ ぞ れ 横 軸 と 縦 軸 の グラ フ 上 の 1 目盛 で デー タ の 
いく つ に 使う か を 求め て いま す 。 

行 220 で は グラ フ に 打つ 文字 を MS$ に 読み 込み , 
も SU を の 区 等 が ング な ら デ ー あ の つの きた 
し る し と し て 行 380 へ 移り ます 。 

行 2320 で は デー タ 数 を N に 読み 込み ます 。 (デー 
夕 文 は M$ と N に 対す る 値 に 続い て , N 組 の デー 
タ が きま す 。 それ を 繰り 返す こと が で きま す 。) 

行 240 一 360 は , N 組 の X,Y を 読み 込み , 打点 し 
に WE 選 

行 410 一 440 は 軸 用 の 見 出し を 印字 し て いま 
す 。data 文 の 行 600 か ら 行 800 ま で に 21 行 分 8 文字 ず 
つの デー タ を 用 意 し て 見 出し に その まま 使う よう 
に し で ます 。 


較 新 た に 用 いた プロ グラ ム の 特別 機能 


locate 文 
・ ロ ケイ ト と 読み ます 。 
・ 印 字 位 置 を 指定 し ます 。 
・ 一 般 に 
locate X,Y 
の 形 で 用 い , 次 の 印字 位置 を ( x, y ) と し ます 。 
x と y に 端数 が ある と き は 切り 捨て ます 。 
MOD 
・ モ ー ド と 読み ます 。 
・ 一 般 に 
y mod n 
の 形 で , y を n で 割っ た 余り を 求め ます 。 
INT 
・ イ ント と 読み ます 。 英 語 の integer (整数 ) に よ 
り 放 EG95 
・ 一 般 に 
INT(x ) 
と いう 形 で , x が 正 の 値 な ら x の 端数 を 切り 捨 
て て 整数 に し ます 。 一般 に x を 越え な い 最 小 の 
整数 を 与え ます 。 x に 式 を 書い て も か まい ませ 
ん 。 
print chr や (12) : 
chr$(x) は x の 値 に 対応 する 文字 を 与え る 関数 
で す 。 これ は 別 の 機会 に 説明 し ます が , x が 12 の 
と き は 画面 を 消 ま する と いう 特別 の 働き を し ます 。 


グラ フ を 描く プロ グラ ム を 素材 に , 実用 的 な プ 
ログ ラム で の こま か い 配 慮 を 見 て ちら いま し た 。 
概略 の 処理 手順 を し っ か り と 考え る こと が よい プ 
ログ ラム を 作る の に 役立ち ます 。 
① 小 さい 画面 を 使い こなす に は , 画面 1 けた, す 

な わ ち グラ フ の 1 目盛 あたり に 対応 する デー タ 

の 幅 (プロ グラ ム P11-3 の 行 190, 200 の S1, S 

2) を 決め て お きま す 。 グラ フ の 枠 の 両端 の 値 を 


デー タ の きり の よい 値 に 対応 させ る と よい で し 
よ )5 き 

②console 文 で 画面 の 一 部 を スク ロー ル し な いよ う 
に 固定 し た り , locate 文 を 使っ て 画面 の 好き な と 
ころ に 好き な 順 で 印字 する こと が で きま す 。 
locate 文 の 使い 方 を マス ター する と 画面 を 上 手 に 
あや つる こと が で きま す 。 
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ーーー トー キーBhg シ ーー ーー 


① プ ログ ラム P11-2 を 実行 し て , 座標 に な れ て 下 プロ グラ ム P11-3 の デー タ を 変え て 実行 し て み 


き 。 


490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 
540 DATA 
550 DATA 
560 DATA 
570 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
650 DATA 
660 DATA 
670 DATA 
680 DATA 
690 DATA 
700 DATA 
710 DATA 
?20 DATA 
?30 DATA 
740 DATA 
?50 DATA 
760 DATA 
770 DATA 
780 DATA 
790 DATA 
800 DATA 
810 DATA 
820 END 


で 3R 飼 03。 


1260 , 0 ,1980 , 20 
※。10 
1262。7。1964 ,9。1966, 10 


1268 。13,1970。15,1972,15 
1974,17,1976,18,1978, 19 
1980,18 

// 

5 1960 1970 1980" 
9 ーーー> ネ ン " 
(の 

0 

1 

PO 

NN 

2 

NM 

| く 出 

2 

へ 10 山 

Nu 

lr 

山 人 | 山 

3 

「 

0 

二 2 


g タ " イカ" クセ イ スウ / へ ンカ " 


〈⑧ プ ログラム P11-3 に 次 の 行 を 追加 し て 実行 し て 
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みて 下さ い 。 
315 COLOR 6 
375 COLOR 7 


結果 は カラ ー 頁 の 83 頁 に あり ます 。 


12 ば ら つ き の 表示 


人 @ 放 送 日 12 月 22 日 ( 水 ) 傘 再 放送 日 12 月 26 日 (日 ) 


下さ い 。 


デー タ の 分 布 の 様子 を 見 る に は , ヒス ト グ ラ ム が 役に立ち ます が , 幹 葉 
表示 と も いわ れる 表示 の 方 法 も 大 変 便利 で , 作り 方 も 簡単 で す 。 幹 葉 表示 
は , デー タ の 整理 を 手 作 業 で する と き に も , よい 方 法 で すか ら 試し て みて 


圏 数 を 幹 と 葉 に 分 ける 


例え ば , ある 小学 校 の クラ ス で の 国語 の 試験 の 
成績 の デー タ が , 95, 82, 76, 98, … と いう よう 
に 100 点 満点 で つけ られ て いる と し ます 。 そ の よ 
うな 数 字 の 1 の 位 を 葉 , 10 の 位 以上 を 幹 と 呼 
ぶ こ と に し まし ょ う ( 図 1 )。95 の 9 を 幹 , . 5 を 葉 
と する わけ で す 。 そこ で , まず 幹 を 図る 2 の よう に 
書き ます 。 次 に その 幹 の 右側 に 葉 を 書き 込ん で ゆ 
きま す 。 図 3 は 95, 82, 76, 98 ま で すん だ と ころ 
で す 。 こ の よう に し て 作ら れる 表示 を 幹 葉 表示 と 
呼ぶ こと が あり ます 。 鉄道 の 駅 で 見 られ る 電車 の 
時 刻 表 も 一 種 の 幹 葉 表示 で すね 。 


に な きい ) 8 2 りー 
†† に 学科 は 誠 と 
幹 葉 幹 葉 幹 葉 
図 1 数 字 を 幹 と 葉 に 分 ける 
| 0 * 0 
1 *※ 1 ネ 
2 2 ネ 
3 3 玉 
4 * 4※ 
5 ネ 5 来 
6 * 6 ネ 
7 * ネ 7 *※|6 
8 ネ 8 玉 |2 
9 * ネ 9*|58 =-95 と 98 の 二 
10* 10* を 5 
L 
図 2 幹 の 表示 例 図 3 幹 葉 表 示 の 過程 


表示 1 幹 葉 表 示 


0※ | 

1※| 

2X10 

3※ 15 
4※155 
こと 3 1 

6X 10005558 


7% 10033355566 
8*10000005555558888 
9xX 10000555588 
10%1000 


園 マ イコ ン に 表示 させ る 


幹 葉 表示 を 作る プロ グラ ム で 表示 させ た 一 例 を 
表示 1 で 見 て 下さ い 。 数字 を 入力 する と その 葉 が 
すぐ に 表示 され て ゆく の を 見 る の は 楽し いも の で 
す 。 プ ログ ラム P12-1 や P12-2、 あ る い は 付録 の 
P12-3 を 使っ て 試し て 下さ い 。 表示 1 は デー タ の 
分 布 の 様子 を 見 る 柱状 図 (ヒス ト グ ラ ム ) と し て 
も 使え ます が , デー タ の 最大 最小 や 中 央 値 (デー 
タ を 大 きい 方 と 小さ い 方 の 半分 に 分 ける 中 央 の 値 ) 
が すぐ に わか り ま す 。 


較 幹 葉 表 示 の プロ グラ ム 


表示 1 の 幹 の 部 分 は 次 の プロ グラ ム で 書け る で 
有 要 3 
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FOR IL=0 TO 10 

PRINT USING 「 拉 杜 "』Tj 

PRINT "※|' 

NEXT 1 

土 は T を 0 か ら 10 に 変え て 作り ます が , 表示 を 
きれ い に す る た め に , print using 文 を 使っ て 
いま す 。 " 壮 半 "は 数 値 を 2 けた の 欄 に 右寄せ で 
印字 する こと を 指示 する 書式 指定 で す 。 

葉 の 部 分 の 印字 は , デー タ を 一 つ ず つ 入 力 し な 
が ら 印 字 す る た め に , すでに 書き 込ま れ て いる 葉 
の 数 を 電 ご と に 覚え て お いて , その と な り に 印字 
する 必要 が あり ます 。 そこで, 配列 下 を 用 いて , 
第 1 番目 の 幹 の 葉 の 数 を F(T ) に か ぞ え て お き 
ます 。F は カウ ンタ で すか ら , は じ め に すべ て の 
要素 を ゼロ に 払っ て お きま す 。 デ ー タ X が 入力 さ 
れ た と き , その 幹 は 10 の 位 以 上 の 部 分 で すか ら 

1 INT(X/10) 
と いう let 文 で 求め られ ます 。X を 10 で 割っ て , そ 
の 端数 を 切り 捨て て 1 に 代入 し ます 。X の 1 の 位 
は , その 1 を 10 倍 し て , X か ら 引 く こ と に よっ て 
求め られ ます 。 つ まり 

Z ニ メーT1I *10 


表示 2 プロ グラ ム P12-1 


10 REM P12-1 

20 DIM F(10) 

30 PRINT CHR*(12)』 

40 CONSOLE 15,5,0,1 

っ 0 LOCATE 0,2 

60 FOR 1I=O TO 10 

70 FT )=0 

80 PRINT _ USING 「 村 "15 
20 PRINT "*1' 

100 NEXT I 

110 LOCATE 0,20:TINPUT X 


130  Z=X-IX10 
140 LOCATE FK(1 )+3。 1+2 
150 PRINT _ USING "##"』Z 
160 GOTO 110 
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120 1=INT(X/10 ) :F( { )=F( 1 )+1 


7: 印字 の 位置 指定 


と する わけ で す 。 例えば, メー95 の と き , 
95 プ 10 っ 9.5 ぞ っ 9 
で , 1 が 9 と な り 
Z=95 一 9※*10=5 
と いう わけ で す 。 こ の 5 を 9 * の 幹 の 行 に 印字 す 
れ ば 葉 の 印字 と な り ま す 。 
以上 の 準備 で プロ グラ ム P12-1 は すぐ に 理解 で 
きる で し ょ う 。 まず, 処理 の 概略 の 手順 を 示し て 
お きま す 。 カ ッ コ 内 の 数 字 は プロ グラ ム の 行 番号 
iCWeOf 
幹 葉 表示 の 作成 手順 
@ 画面 を 消去 する (30) 。 
@ ス クロ ー ル の 男 囲 を 第 15 行 以下 に する (40)。 
@ 幹 を 表示 する 
@ デー タ X の 入力 の ある か ぎり 以下 を 反復 する 。 
@ デー タ を 入力 する (110) 。 
@ 葉 を と り 出 し , 幹 ご と の 葉 の 数 を か ぞ え る 
@ 葉 を 表示 する 
プロ グラ ム P12-1 を 表示 2 に 示し ます 。 
プロ グラ ム P 12-1 の 説明 
行 20 は 配列 F の 宣言 で す 。 寸 法 が 10 ま で の 場合 
は 省略 し て も か まい ませ ん 。 
行 30 は , 前 回 も 出 て きた 画面 消去 の 手 で す 。 


幹 の 表示 


葉 の 印字 


表示 3 
プロ グラ ム P12-2 


REM PF12ー2 
20 DIM F(20) 


ーー ニーー 人 BSH 
53 う 
6 * 
6 〇 
7* 110 NEXT Y 
7O 120 LOCATE 0,20:INPUT X 
8 * 
8O 140 Z=X MOD 10 
9 * 150 LOCATE F(Y)+ ア ,Y+2 
9O 160 PRINT USING "#"』Z 
1.0* GOTO 120 


図 4 5 お き の 幹 


行 40 は , 
まず 。 
行 50 は 幹 の 表示 の 開始 位置 を 第 2 行 に し ます 。 
行 60 か ら 行 100 で 幹 を 表示 する と と も に , 配列 F 
の 各 要 素 を ゼロ に し て いま す 。 区 
行 110 は 画面 の 最 下段 を 使っ て , デ ー タ の 入力 を 
行い 。 双 に 入れ ます 。 

行 120 は X の 幹 の 値 を I に 入れ , その 幹 の 葉 の 数 
を F( IT ) に か ぞ え ます 。 

行 130 は X の 葉 を 取り 出し て いま す 。 

行 140 は 葉 の 印字 位置 を 指定 し ます 。 

5OG 人 な 小 REEcCHKONESY 守 選 2 

の 3 と 2 は 幹 の 第 0 番目 の 画面 の た て 棒 の 位置 を 
G3 の に と うう) で の の の 8 で ST BE 
位置 を ずら す た め で す 。 

行 150 は 葉 を 印字 し て いま す 。 葉 の 印字 は 1 けた 
ilo GO まさ 

行 160 は 行 110 へ 戻っ て デー タ の 入力 と 葉 の 表示 
の 繰り 返し を 行い ます 。 


田 幹 の と り 方 を 変え る 


スク ロー ル の 範囲 を 第 15 行 以下 に し 


TI ) の 


試験 の デー タ が 55 点 か ら 100 点 の 間 に 入 る こと 


30 PRINT CHR$(12): 

40 CONSOLE 15,5,0,1 

5S0 LOCATE 0,2 

60 FOR Y=55 TO 100 STEP 5 


80 PRINT USING " 革 拉 拉 電 寺村 "*INT(Y/10)5 


20 IF Y MOD 10=0 THEN PRINT 
100 IF Y MOD 10<>0THEN PRINT "OF" 


130  Y=INT((X-55)/S) :F(Y )=F(Y )+1 


" 類 " 


は よく ある で し ょ う 。 そ の と き , 10 点 間隔 の 幹 の 
と り 方 で は 幹 の 数 が 少な いと 感じ る も の で す 。 そ 


さこ 図 4 の よう に , - 幹 を 5 京 お き に と っ で て, 6 
* の よう に 腔 の と 二 ろ は 0 デ 4 の 葉 ほ , 6 O の よ 
うに 脱 形 @ の と ころ は 5 デ 9 の 葉 を つけ る と よ 
いで し ょ う 。 こ の 場合 の プロ グラ ム を 表示 3 に , 
その 実行 結果 の 一 例 を 表示 4 に 示し て お きま す 。 
表示 3 の プロ グラ ム P12-2 は P12-1 を 次 の 点 を 少 
し 変更 し た だ け で す 。 
・ 行 60 の for 文 を 

BORNY 三 55* EEO iA00STEP で 5 

と 変え て , 幹 の 番号 1 を 行 70 で 求め て いま す 。 こ 


aa 


表示 4 5 お き の 幹 葉 表示 


_5OI8 
6※100 
6O155588 
ィ %※1000 
ィ 7O15555588 
8x 10000003333 
8O155558888 
9x100000 
9O1555 


10X10 
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の for 文 で Y は 55 か ら 5 お き に 60, 65, 70 と 100 
まで 変わ っ て ゆき ます 。 

・ 行 70 で は Y か ら 55 を 引い て 5 で 割る こと に より 
幹 の 番号 I を 求め ます 。 Y の 55, 60, 65、… に 
対し て , I が 0, 1, 2,… と な る こと を 確か め 
て 下さ い 。 

・ 行 80 で は 幹 の 数 字 部 を 印字 し て いま す 。 そ の 数 
字 は Y が 60 な ら 6 と いう よう に 10 の 位 を と り 出 
す の で , INT (Y/ 10) と な っ て いま す 。 

・ 行 90 と 100 で 幹 の 表示 を し て いま す 。 幹 は Y が 10 
で 割り 切れ る と き は * | を 使い 、 そう で な いと 
き は O | を 使い ます 。 MOD は 余り を 求め る 
働き を し ます 。 

・ 行 130 は デー タ X か ら 55 を 引い て 5 で 割り , そ 
の 整数 部 で 幹 の 番号 を 求め ます 。 例 えば X ニ 67 
な ら (67-55) プ 5=2.4 か ら I= テ 2 (0 か ら 
は じ め て ) の 電 と いう こと に な り ま す 。 
プロ グラ ム P12-2 の 各行 ご と の 説明 は 省略 し ま 

す が , step の つい た for 文 が 新しく 出 て きた の で 

追加 の 説明 を し て お きま し ょ う 。 

for 文 

・ 一 般 に 
FOR 変数 = 初め の 値 TO 終り の 値 STEP きざみ 
と いう 形 を と り ま す 。 

・STEP を 省略 すれ ば , きざみ は 1 に な り ま す 。 


・ 変 数 を 初め の 値 か ら は じ め て , きざみ の 分 だ け 
変え な が ら , 終り の 値 を すぎ る まで 繰り 返し を 
行い ます 。 

・ 初 め の 値 , 終り の 値 . きざみ に は 式 を 書く こと 
も で き , 矛盾 が な けれ ば , 負 の 値 を と っ て も か 
まい ませ ん 。 

M OD ( 例 ) Z=X MOD 

・ 前 回 も 出 て きま し た 。 余り を 求め ます 。 


10 


圏 いろ いろ な 幹 の と り 方 


これ まで , 10 お き と 5 おき の 幹 の と り 方 を や っ 
て み ま し た が , デ ー タ が 10 か ら 30 の 間 で あっ た り , 
55 か ら 67 の 間 の と き は , それ ぞ れ 2 お き や 1 お き 
の 幹 の と り 方 を し た いも の で す 。 間 隔 は 10, 5, 
2, 1 な どき り の よい 数 に と る の が よい で し ょ う 。 
いろ いろ な 幹 の と り 方 を まとめ て 図 5 に 示し て お 
きま す 。 

2 お き の と き は , 葉 を 

3 NrE23 和 0 
の が 8 
4 ,5 
677ー ら 5 
Sn9 が 2 〇 
に 対応 させ ます 。 t は 英語 の 2 , 3 の two, three, 
f は 4,5 の four,。 five, s は 6, 7 の six。seven 


2 


に こ あ 和 


10 お き 5 お き 2 お まき 」2。2 を 1.3 の 3 を ! お き 
0 ネ * 5 〇 1] 米 隊 
1 6 * 1t|23 5 6 
2 ※ 6 〇 1fl45 5 7 
3 * 7 * 1sle7 5 8 
4 7 〇 1O|8 9 5 9 
5 * 8 * 2*|o1 6 0 
6 * 8 〇 O 2 t 6 1|1 < 一 一 一 一 一 6 1 は 1 を 
7 * 9 * の :.f 6 2 
8 * 9 〇 2.s 6 3 
9 * 10* の ら Y@) 6 4 

10* 3 * 6 5 

※* は 0 一 9 * は 0 一 4 6 7 

〇 は 5-9 * ネ の と ころ は 0 と 1 

t の と ころ は 2 と 3 

f の と ころ は 4 と 5 

図 5 s の と ころ は 6 と 7 

いろ いろ な 幹 の と り 方 Mo 
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か ら と っ て いま す 。 

1 お き の と き は 幹 に は 数 字 の み を 書き , 葉 に は 
1 の 位 を 書き ます 。 

も し , デー タ が 3070, 3290、 4500, 7900 の よう 
に バラ ツク と き は 百 の 位 ま で を と りあ げ て , 10 の 
位 か ら は 無視 し て , 幹 葉 表 示 を 作り ます 。 デ ー タ 
が 5.6, 7.2、3.4 の よう に 小数 点 以 下 の 数 字 が 必 
要 な と き は 10 倍 し て 扱い ます 。 い ずれ に し て も 。, 
適当 な 男 囲 の 2 ー 3 けた の 整数 に し て 扱う こと が 
デー タ を 整理 する こつ で す 。 

一 般 的 な プロ グラ ム は 付録 に の せ , ここ で は そ 


表示 5 2 お き の 幹 葉 表 示 


1X10 
4 も 23 

全 当 半 の 9 

1s16 

10I 

2%1000011 

2t 133 
2f1444445555 
2s 166667777777 
2O18888899 
3※100 


の 実行 例 を 表示 5 , 6 に 示し て お きま し ょ う 。 そ の 
プロ グラ ム P12-3 で は まず , デー タ の 男 囲 を 示す 
初め の 値 と 終り の 値 と き ざ み を 入力 し ます 。 例 えば 

( き 半 Up【 も 0 齋 【U 

7? 555 100, 5 

HOSSsGSOS:E2 

307 
が それ ぞ れ , 10, 5 , 2, 1 お き の 幹 を と る と き 
の 入力 例 で す 。 こ の あと 幹 が 表示 され ます の で , 
デー タ を 入力 し て ゆき ます 。 


表示 6 1 お き の 幹 葉 表 示 


つよ 5 

56 166 

っ 7 | 

5818 

59 19999 
6010000000 
611111111111 


62122222222 
63 1333333 
64144444 

65 1555 
_6616 

6717 


画面 の 一 部 を 停止 させ て LOCATE 文 で 位置 を 指 
定 し な が ら 印 字 す る と , いろ いろ と お も し ろ い こ 
と が で きま す 。 
① 幹 の と り 方 を 変え て も , プロ グラ ム の 構造 は 

ほとん ど 変 わり ませ ん 。 い ろ い ろ な 幹 の と り 方 

に 対し て 別々 の プロ グラ ム を 作ら な く て も , 幹 

の 初め 値 , 終り の 値 , きざみ の 間隔 を 与え る こ 

と に よっ て 一 般 性 の ある プロ グラ ム に する こと 


が で きま す 。 付録 P12-3 の プロ グラ ム も よく 読 
ん で みて 下さ い 。 
② 数 値 の 1 の 位 や 10 の 位 を と り 出 す 方 法 が 利用 
され まし た 。 
XX MOD 10 
は XX の 1 の 位 を , 
INT (メン ノ 10) 
は 双 の 10 の 位 (か ら 上 ) を と り 出 し ます 。 


ーー て まろ ーーー 


① プロ グラ ム P12-1 で F( 1 ) の 値 を 最後 に 印字 
ずる 庄 う 濾 夫 ゆ じ 交 下さ 5 


② 入力 し た デー タ の 件 数 を か ぞ え て , 最後 に 出 
力 336 仙 25 太 正夫 じ で 下さ ぬ 。 
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13 | お し どり 遊び 


人 放送 日 12 月 29 日 ( 水 ) 欠 再 放送 一 


マイ コン を 利用 し た ゲー ム に は な か な か 楽し いも の が あり ます 。 こ こ で 
は マイ コン と 対戦 する の で は な く , パズル を 解く よう な 一 人 遊び の ゲー ム 
を や っ て み ま し ょ う 。 日 本 で も 昔 か ら 知ら れ て いる 「 お し どり の 遊び 」 を 
と りあ げ ま す 。 こ の ゲー ム は いろ いろ な 変化 も 楽し め ま す 。 


す 。10 か ら は 縦 に 
較 問題 
1 
画面 に 白 と 黒 の 石 が 交互 に 置い て あり ます ( 表 0 
示 1 )。 石 の 上 に は 位置 を 示す 番号 が 付け て あり ま な ど と 見 て 下さ い 。 一 ーー と ある の は 空い て いる 
場所 1 
表示 1 最初 の 石 の 置き 方 1 
111111 問題 「 隣 りあ っ た 2 個 を いっ し ょ に , つ づい て 
0123456789012345 空い て いる 場所 に 移す 」 操 作 を 繰り 返し て , 折 石 
と 黒石 を まとめ て 下さ い 。 
表示 2 
プロ グラ ム P13-1 醒 信久 人 人 0 
の 実行 例 0123456789012345 
O@O@O@- ーーーーーーーーー 
ドレ t グ 7 で 1 と 2 の 石 を 
1 6 と 7 の 場所 へ 
人 ま 市 角 1 ( 左 の 番号 を 指定 し ます ) 
0123456789012345 
NO の 
誠人 YRR- 
アイ テ イマ セン ゃ ーーーーーーーー 一 2 と 3 の 3 は 空い て いな い 
2 レ 2 の 
イシ カ " アリ マセ ンーーーーーーーーー-7 と 8 の 8 は 石 が な い 
ト " レ ラ ? 4 (間違っ た 指定 を する と 指摘 され ます ) 
1 
111111 
0123456789012345 
OO@@- 一 @ 〇 ーーーーーーーー 
ト * レ し ヲ ラ ? 6 
トド SPA 4 
人 人 注 主人 
0123456789012345 
ト " レ ラ ? 0 
ト ^ コ A? 6 
外注 條 人 
0123456789012345 
ーー 久 @@ 〇 〇 〇 ーーーーーーーー で き あ が り ま し た 
NE ヲ ? 
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プロ グラ ム P13-1 で 遊ん だ 結果 を 表示 2 で 見 て 
下さ い 。 い ちば ん 下 の 図 が で き あ が り で す 。 黒白 
の 順 は どちら で も か まい ませ ん が , 白 と 墨 が ま と 
まっ て すき まな く 並 ん だ ら 成 功 で す 。 

マイ コン か ら は 

ド kt 枝 うそ 
と きい て きま すか ら , 隣り あっ た 2 個 の 石 の 左側 
の 番号 を 入力 し ます 。 次 に 

1 
の 問い 合わ せ に , つづ いて 空い て いる 場所 の 左側 
の 番号 を 入力 し ます 。 隣り あっ た 2 個 の 石 の な い 
番号 や , 空い て いな い 場 所 の 番号 を 間違っ て 入力 
する と , マイ コン か ら 知 ら せ て きま す 。 その と き 
は ト " レ ヲ ? か ら や り 直 し て も らい ます 。 
石 の 移動 は , 必ず し も 別 の 石 を 飛び 越 さ なく て も 
よく , ずら す だ け で も か まい ませ ん 。 


田 遊 ん で みよ う 


石 の 数 を ふやし て ゆく と 上 難し くも な りお も し ろ 
くも な り ま す 。 ここ で は 容 の よう な プロ グラ ム を 


表示 4 
プロ グラ ム P13-2 


プロ グラ ム P13-1 


REM P13-1 オシ ト " リ ケ " 
20 . REM:: ニ = ニー マエ ショ リ ニー 
30 DIM .C(15) 

40 し 中 = 111 
50 M$ ま =" 0123456789012345“ 

60 A=" O@O@O@- 

ィ 70 FOR 1=0 TO 5:C(I)=1 :NEXT 1 
80 FOR 1=6 TO 15:C(1 )=0:NEXT 1 
90 REM ニー ニー ヒョウ シラ" ーーー 

100 の L ま :PRINT M$:PRINT ム A ま 
0 Ear ニュ 9 リョ ク ト チェ ゥ ク エ ェ ー 
120 INPUT " ト " レ ラ "』J 

130 IF C(J)※C(J+1 )=1 THEN 150 
140 PRINT "イシ か " 0 120 
150 INPUT " ト " コ A'sK 

160 IF CK(K)+C(K+1 )=0 THEN 180 
170 PRINT "アイ テ イマ セン ":GOTO 120 

た BUSREIM ペー の や ーーー 

190 MID ま (A ま ,K+1 。 2)=MID ま (A ま も 。 J+1 ,2) 
200 MID ま (A ま ,J+1 ,2)="ーー 

210 C(J)=0:C(J+1 )= 0 

220 CK(K)=1 :C(K+1 )=1 

GOTO0 90 


を の) 


用 意 し まし た 。 遊 ん で みて 下さ い 。 

プロ グラ ム P13-1 (表示 3 ) 
石 が 6 個 の 場合 、 で き あ が り の 判定 
し て 下さ い 。 

プロ グラ ム P13-2 (表示 4 ) 

石 が 8 個 の 場合 ,、 でき あがり の 判定 は 自分 で 
し て 下さ い 。 
の 表示 が 出 ます 。 

プロ グラ ム P13-3 (表示 5 ) 

石 が 8 個 の 場合 、 で き あ が り の 判定 を マイ コ 
ン が 行い 成績 を 表示 し ます 。 う まく いけ ば 
2 夫 SS と 2 あす と いう で きま す 。 

プロ グラ ム P13-4 (表示 6 ) 

石 を 好き な 数 に 選べ ます 。 石 の 数 は 6 以上 28 
まで の 偶数 に し て 下さ い 。 も っ と も 2 や 4 の 
場合 も 受け 付け ます か ら , どう な る か や っ て 
みて 下さ い 。 

プロ グラ ム P13-5 (付録 に あり ます ) 
これ まで と 逆 に , まとまっ て いる 石 を 同じ 操 


は 自分 で 


作 で 変 互 に 並べ か えて も らい ます 。 


REM P13-2 オシ ト “" リ ケ *ー ム (2) 


の US 投 紅 章 だ で 選 こ と ポ うり コー 
308BHWGC で 15) 
35 T=0 


0 に も ="1 人 1111" 

50 M$=" 0123456782012345" 
60 ^A ま =' O@O@O@O@ 一 

ィ 0 FOR 1=0 TO 7:C(I)=1:NEXT 1I 

80 FOR 1=8 TO 15:C(1I)=0:NEXT 1 

90 REM . ーー ee 

95 PRINT Tj " テ メ ”"jTAB(10)} 

100 PRLNT 6 HE M ま : PRINT A$ 
110 REM ーーー ニュ ウリ ョ ク ト チェ リク ーー 一 

人 20 ENPUE ドル ラ >J 

130 IF C(J)xC(J+1 )=1 THEN 150 
140 PRINT "イシ ヵ カ " アリ マセ ン " GOTO 120 
150*TNPUT "トド ドコ へ "が K 

160 IF C(K)+C(K+1 )=0 THEN 180 
170 PRINT "アイ テ イマ セン "siGOTO 120 
180 REM ーー イト "9 ーーー 

190 MID$(A,K+1 。2 ) ニ = MID ま (人 ま 。 +1。2 ) 
200 MID ま (A ま ,J+1 ,2)="ーー 

210 C(J)=0: C(J+1 )= 0 

220 CK(K)=1 :C(K+1 )=1 


225 T=T+1 
230 GOTO 20 
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表示 5 
プロ グラ ム P13-3 


NITE や の 


REM P13-3 オシ ト *" リ ケ "ー ム ( さ 3) 


RENM ーーー マエ ショ リ ーーー 
DIM C(15) 
T=0 


し も ="111111 " 
M ま = ,0123456789012345" 
A= " O@O@O@ 〇 ーーーーーーー 一 
FOR 1=0 TO 7:CK(1)=1:NEXT I 
FOR 1I=8 TO 15:CK( 1 )=0 :NEXT 1I 
REM ーーー ヒョウ シラ" ーーーー 
PRINT Tj " テ メ " TAB( 10): 
PRINT しま:PRINT M ま :PRINT ム A ま 
REM ーーー 八 ン テイ ーー 
IF INSTR(A ま ,” @@@@OOOO”) >0 THEN 300 
IF INSTR(A ま , "OOOO@W@@@”)>0 THEN 300 
REM ーー ニュ ウリ ョ ク ト チェ リク -ーー 
FNPUT トラ 
IF C(J)※C(J+1 )=1 THEN 150 
PRINT “イシ ヵ カ " アリ マセ ン " :GOTO 120 
INPUT "トド" コ A"sK 
IF C(K)+C(K+1 )=0 THEN 180 
PRTINT “アイ テ イマ セン ":GOTO 120 
REM ーーー イト " ウ ーーー 
MID ま (A ま ,K+1 。 < りあ きま 。 還 人 の) 
MID ま も (A ま ,J+1 2)="ー 


C(J)=0:C(J+1)= 0 
CC(K)=1 :C(K+1 )=1 
T=T+1 

GOTO 90 

REM ーー セイ セキ ーー- 
PRINT 


PRINT "テキ マシ タ 『 5 
IF T>=7Z THEN 370 


IF T>=5 THEN 360 

PRINT " テン サイ ! ” GOTO 380 
PRINT ュ ウ サイ ! " sGOTO 380 
PRINT ト " リョ クシ ヨ ウ “ 

PRTNT 。" モ り イチ ト " ト * ウ ツ ソ * 『" 

GOTO 35 


個 の 場合 の いち ば ん うま い 手 を 表示 7 に 示し て お 


圏 最小 の 手数 は 
きま す 。 こ の よう な 手順 を 
この 遊び は 200 年 以上 も 前 に , 中 野 法 組 が 『 勘 3 つ 6, 0 つ 3.。 2 一 8 
者 御伽 双紙 』」 に 「 徐 著 (お し どり ) の 遊び 」 と いう と 書く こと に し ます 。 表 示 2 で は 
名 前 で 書い て いま す 。 欧米 で は テー ト の 問題 と い 1 っ 6, 4 つ 1,. 6 一 4, 0 一 6 
われ て いる そう で す 1。 で 4 手 か か っ て いま す 。 一般 に は , 最小 の 手数 は 
この 遊び に 慣れ て くる と , 短い 手数 で 完成 する 石 の 数 の 半分 に な る 一 一 8 石 な ら 4 手 , 10 石 な ら 
方 法 が だ ん だ ん と わか っ て くる で し ょ う 。 石 が 6 5 手 で で きる 一 一 こと が わか っ て いま す 。 6 石 か 


† 池野 ・ 高 木 ・ 土 橋 ・ 中 村 ・ 中 村 数 理 パ ズル 中 公 新書 427 昭和 51 年 , 中 央 公論 社 , 84 一 91 頁 を 参照 し まし た 。 
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10 REM P13-4 オタ ト *" リ ケ "ー ム (4) 


A ま =LEFT 和 ま (B ま ,S )+LEFT ま (C ま ,30-S ) 


FOR I=0 TO S-1:C(1)=1:NEXT 1 
FOR I=S TO 29:kC(1)=0:NEXT 1I 
REM ーー ヒョウ シラ“ 
PRINT T』 テ メ ”3TAB(10)3 
PR INT しま :PRINT M ま :PRINT ^A$ ま 
REM ーーー 八 ン テイ ーーー 
IF INSTR(A$,E ま )>0 THEN 370 
IF INSTR(A ま $,F ま )>0 THEN 370 
REM ーーー ニュ ウリ ョ ヨク ト チェ リク 一 一 一 
INPUT " ト " レ ラ ' ぉ jJ 
IF C(J)XC(J+1 )=1 THEN 270 
PRINT "イシ カ " アリ マセ ン "650TO 240 
INEMTS2NS コ IA KK 
IF CCK)+C(K+1 )=0 THEN 300 
PR INT "アイ テ イマ セン ":GOTO 240 
REM --- イト ~ ウ 
MID$(A ま も ,。K+1 ,2)=MID ま (A+1 2 ) 
MID$(A ま ,J+1 ,2)="ーー“ 
C(J)=0:C(J+1)= 0O 
C(K )=1 :C(K+1 )=1 
=T+1 
GOTO 170 
RE ここ セパ セ キーーー 
PRINT 
PRINT " テ " キ マシ ミタ" ぅ 
IF T>=S-1 THEN 440 
IF T>=S/2+1 THEN 430 
PRINT “ テン サイ ! " :GOTO 450 
PRINT “ ミュ 9 ウ サイ! "GOUTO 450 
PRINT ト " リョ クシ ヨウ 
PRINT "モウ イチ ト " ト "9 ツ "『 
GOTO 40 


っ 


20 REM --- マエ ラ ョ リ ーーー 

30 DIM C(30) 

40 T=0 

50 し ="11111111112222222222" 

60 M$="012345678901234567890123456789* 
ィ 0 B*='O@O@O@O@O@O@O@O@O@O@O@O@O@O@O@" 
80 C*="ーーーーーーーーーーーーーーーーーーーーーーーーーーー 

90 D*=" 

100 INPUT" イ シ / カス" AA(2"929) "3S 


IF S MOD 2 <>0 THEN BEEP:GOTO 100 


E ま =LEFT ま (D ま ,S/2)+RIGHT ま (D ま ,S/2 ) 
F=RIGHT ま (D ま ,S/2)+LEFT ま (D ま ,S/2 ) 


表示 6 
プロ グラ ム P13-4 


表示 7 6 和 石 の 最短 手順 


111111 
01234567892012345 
O@O@O@ ニ ニ 


5411 


ト " レ ヲ ? 0 
RAI か お 
も 14 
01234567892012345 
OO@@@ 〇 ーー 


上 ま 1 は 1 


ら 14 石 まで の 最短 手順 を 章 末 (80 真 ) に 示し て お き 
ます 。 あと は 自分 で 考え て 下さ い 。 8 石 の 場合 の 
あま りう まく な い 例 を 表示 8 に 示し ます 。 

較 プ ログ ラム P13-4 の 使い 方 


実行 例 を 表示 9 に し て お きま す 。 実 行 (run) 
を 指令 する と 


222 カ SYRZNOG 久 EZ 基 必 角 NZ 
と きい て きま すか ら 6 か ら 28 の 偶数 を 入れ て 下さ 
い 。 0 か ら 29 の 場所 が 用 意 し て ある こと の ほか は 
これ まで の プロ グラ ム と 変わ り ま せん 。 


較 プ ログ ラム で の 処理 手順 


プロ グラ ム P13-1 か ら P13-4 は いずれ も 同じ よ 


7 


表示 8 8 石 の 場合 (あま りう まく な い 例 ) 


0 テ メ 
01234567890 1 2345 
OWDeO@O@S 


111111 


1 テ メ 111111 
0123456789012345 
O 主 eOeQO@eO- 


ト * レ ラ ? 6 

トコ 衝 人 

2 テ メ 111111 
0123456789012345 
OOWWO@ 議 @O- 


トト レラ 、 多 

ト * コ A?-6 

3 テ メ 生生 
01234567890 1 2345 
OO- - Wee@O----- 
トル 朝 語 、 通 

ト * ユ A で る 0 

4 テ メ 111111 
01234567890 1 2345 
OO- - 調 @eeOO@---- 
ト " レ し ラ ? の 

Ar 

チチ X 111111 
0123456789012345 
OO- -OOWW@@---- 
ト " レ ラ ? 6 

ト " コ A? 9 

6 テ メ 夫 : 和 4 
0123456789012345 
OO- -OO== ee@@- 


トド "レラ 7?.0 
NPGNY2N0eDO 
7 テ メ 41111 
0123456789012345 


テ " キマ シタ ト ^ リョ クシ ヨウ 
だり)(0 の RS トリ リド 
8 計 y/ の .4 111111 


0123456789012345 
O@O@O@O@- ーーーーーー 則 


うな 処理 手順 で す 。 そ の 概略 を まとめ て お きま す 。 
前 処理 
石 の 個数 に 応じ て 必要 な 準備 を し ます 。 配列 C 
に は 石 の 置い て ある 場所 の 番号 の 要素 に 1, 空い 
て いる と ころ に 対し て 0 を 入れ て お きま す 。 
手数 を か ぞ え る カウ ンタ の 変数 T を 0 に し ます 。 
その ほか , 必要 な 文字 列 を 用 意 し ます 。 
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表示 9 プロ グラ ム P13-4 の 実行 例 


イジ カス (の のり ズ スウ) 


0 テ メ 11111111112222222222 
012345678201234567890123456789 
OWO@O@O@O@-ーーーーーーーーーーーーーーーーーーー 
1 
ドコ ^ 10 

ます) 11111111112222222222 
012345678901234567890123456789 
ト * レ ラ 7 6 
N' コ へ 6 
アイ テ イマ セン 
2 必 の 7 
まま 

タチ 11111111112222222222 
0123456789012345678920123456789 
OOW@O@- - 〇 @@O 〇 ーーーーーーーーーーーーーーーーーー 
ト " レ ラ 7? 69 
表示 


石 の パタ ー ン を 表示 し ます 。 手 数 を か ぞ え て い 
る と き は (P13-3, P13-4 ), 何 手 目 か の 表示 も し ます 。 
判定 

表示 され た パタ ー ン が 完成 し て いる か 判定 し 
完成 し て いれ ば , 譜 績 の 表示 へ , 完成 し て い 
な けれ ば 次 の 私 玉 へ 進み ます 。 
入力 と その チェ ッ ク 

ド SI レラ 1 ト `^ 
が し , 入力 され た 値 を 検査 し ます 。 
移動 

正しく 入力 され た 手 に 対し て , 石 の 移動 を 行い 
ます 。 石 の パタ ー ン は 文字 変数 A$ に 保存 し , 空 
き の 状 態 を 配列 C に 記憶 し ます 。 こ こ で , 手数 の 
カウ ンタ を 1 増し ます 。 
成績 

最小 の 手数 で 完成 すれ ば 市 家 符 環 較 , すこ し 
多い 手数 な ら 引 艇 才 !」 , ある 程度 以上 な ら 
協力 し よう 」 と 印字 し ます 。 そ の あと 

「 もう: 一度 どう ぞ 」 
と 印字 し て 最初 に 戻り ます 。 

プロ グラ ム P13-1, P13-2 で は 判定 や 成績 表示 

を 省略 し て あり ます 。 P13-1 か ら P13-4 ま で , プ 


コ upNI2w を 人 大湯 あ 人 な 


ログ ラム が だ ん だ ん 改良 され て ゆく 様子 を 見 て 下 
さい 。 プ ログ ラム の rem 文 に それ ぞ れ の 処理 の 
注釈 を 入れ て あり ます 。 


国文 字 列 の 取り 扱い 


プロ グラ ム の くわ し い 説 明 は 省略 し て , ここ で 
は , 文字 列 に 関係 する 処理 を まとめ て お きま し ょ 
う 。 
文字 列 か ひら その 一 部 を と の 出す 一 一 抽出 一 一 
_LEFT$, MID$, RIGHT$ の 三 つ が あり ます 。 
これ ら は , "関数 " と 呼ば れ ま す 。 次 の 例題 で 
その 働き を 見 て 下さ い 。 


10 a ま ="' 123456789“ 

20 print le† せ まま (aa も,5) 

30 print mid ま (a ま ,3,5) 
40 print right せま (a ま 。4 ) 


a$ の 左側 の 5 文字 を と り 出 す 


a$ の 左 か ら 3 文 字 目 か ら 5 文字 を 
と り 出 す 


a$ の 右側 の 4 文字 を と り 出 す 


LEFT$ は A$ の 左 , RIGHT$ は A$ の 右 , MI 
D$ は A$ の 中 の 文字 列 を と り 出し ます 。 

カッ コ 内 の コン マ で 区 切ら れ て 並ん で いる 変数 
や 数 を 引数 と 呼び ます 。LEFT$ と RIGHT$ 
は 二 つ の 引数 , MID$ は 三 つ の 引数 を 使い ます 。 
引数 と し て は 式 を 書く こと も で きま す 。MID$ は 
特別 に 1et 文 の 左辺 に 書く こと が で きま す の で 次 
の 項 を 見 て 下さ い 。 
文字 列 の 一 部 を 別 の 文字 列 で 取り 替え る ー- 代入 一 一 
MID$ を 代入 文 の 左辺 に 書き , 右辺 に 文字 の 式 
を 書い て , 文字 列 の 中 へ の 代入 が で きま す 。 
まず 例 を 見 て 下さ い 。 


10 m ま =" オ "カサ ン " 

20 mid ま (m ま 。2。3)= "リコ ウ テ * ス " 
30 print m ま 

un 

オリ コウ サン 

0k 


一 般 に , 

MID$ (M$, 1,J)= テ Y$ 
の 形 で , MS の 1 文字 目 か ら J 文字 分 に Y$ の 先 
頭 か ら 文字 を 代入 し ます 。 結果 と し て MS$ の 長 
さ は 変わ り ま せん 。J と し て 大 きす ぎる 値 を 写 え て 
も M$ の 長 さ は 変わ ら な い の で M$ の 右端 まで に 
代入 され て 打ち 切ら れ ま す 。 い ろ い ろ 試 し て みて 
下さ い 。 
文 守 列 の 足し 算 一 一 結 合 一 一 

足し 算 の 記号 を 使っ て 二 つ の 文字 列 を 結合 し て 
ー つ の 文字 列 に する こと が で きま す 。 例 を 見 て 下 
さい 。 


10 a ま ="12345” 
20 b ま =a ま + "6789“ 
30 print b ま 
un 

123456789 

0k 


文字 列 の 中 に 別 の ある 文 守 列 が 客 ま れ て いる が の 
判定 一 一 計 | 一 一 

文字 列 "ABCDEF" の 中 に "CDE" が 一 つ な 
が り で 含ま れ て いる か と いう よう な 問題 に は , 
INSTR と いう 関数 が 使え ます 。 


10 a ま ="ABCDEF “ 

20 print instr(a ま ま 。 "CDE ” ) 
Pun 

本 

0k 


この 例 の よう に , INSTR は 二 つ の 引数 を 用 い , 
左側 の 引数 の 文字 列 に 右 の 引数 の 文字 列 が 含ま れ 
て いれ ば , 左 の 文字 列 で 存在 する 先頭 位置 を 与え 
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て くれ ます 。 含ま れ て いな けれ ぱ , INSTR の 値 は 
ゼロ に な り ま す 。 英語 で 文字 列 を string (スト リ 
ング ) と いい ,「 中 に 」 と いう 英語 の im と string の str 
を くっ つけ て INSTR と 書い て いま す 。 読む と き は 
302 トウ の グ が で よい で し よう 。 
文字 列 の 文字 数 一 一 長き 一 一 

これ まで の プロ グラ ム で は 使っ て いま せん が , 
文字 列 の 長 さ を 知る と 便利 な こと が あり ます 。 そ 
れ に は 。LEN と いう 関数 を 使い ます 。 


10 a ま ='abcdef" 
20 print len(a ま ) 
un 


6 
0k 


英語 で 長 さ の 意味 の 1ength (レン グ ス ) に よる 名 
前 で す 。 


長 さ ゼロ の 文 守 列 一 一 空 の 文字 列 一 一 

カウ ンタ や 合計 を と る 変数 の ルー プ の 前 に その 
値 を ゼロ に し て お く よ う に , 次 の よう な 例 で は 文 
字 列 の 変数 を は じ め 長 さ ゼ ロ の 空 の 文字 列 に し て 
お きま す 。 


10 a ま ="“" 

20 for ij=1 to 5 
30  a ま =a ま +"@ 〇 " 
40 next 

50 print ag まま 

60 end 


また , LEFT$,。 MID$, RIGHT $ で と り 出 す 文 
字数 が た また ま ゼ ロ な ら 結 果 は 空 の 文字 列 と いう 
こと に な り ま す 。 


ポイ ント 上 


今回 は マイ コン を 利用 し た 一 人 遊び を 楽し ん で 
も らい まし た 。 う まい 手 が 見 つか り ま し た か 。 
① 処 理 概略 の 記述 

プロ グラ ム を 作る 前 に 処理 手順 の 概略 を 部 分 的 


ます 。 
② 文 字 列 の 処理 

文字 列 に つい て , 抽出 , 代入 , 結合 , 包含 の 判 
定 , 長 さ な どの 処理 の 方 法 を まとめ まし た 。 


な 処理 ご と に まとめ て 書い て みる こと が 役に立ち 


? 


SYO DO で と 3 。 の 三 8 


用 に か ぐ 楽 じん で みて 下さ い 。 


② 付録 に は 別 の 一 人 遊び の プロ グ 
ラプ PS6 (ツリ チア )) が の せ 評 
あり ます 。 や っ て みて 下さ い 。 


ジ 
〇 〇 〇 〇 の あの @@@⑨ 


お し どり の 遊び 6 石 
最短 手順 8 石 
10 用 : UEーs1OK6 で 1 3 つっ 60MEO 呈 RS 0 呈 *9 
12 石 1 つ 12。 4 つ 1, 9 一 4。 5 一 9, 1 っ 5,。 0 つ 1 


89650002EST> > アー が 07 


14 石 。 1->14。 8~1。 5 一 8。10 つ 5, 4 つ 10。13 つ 4。 0 つ 13 
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マイ コン に よる 
カラ ー 画 面 


ご こ ご か が から 8 真 は カラ ー の 真 で す 。 テ キス ト で 扱わ ね る 題材 の うち 、 結 
果 が 色付き の 画面 と し て 出 て 来る も の に つい て 、 結果 の 一 部 を 写真 に と 
つて まとめ て あり ます 。 そ れ ぞ れ の 写真 の そば に 画面 を 作 つ だ とき の プ 
ログ ラム 番号 が 示し て あり ます 。 動き の ある も の な ど ご は 、 プ ログ ラム の 
ー 部 を 手直し し て 画面 を 静止 なせ て か ら 撮 影 し を も の も あり ます 。 表示 
画面 の 楽し い 使い 方 を 味 わ つ て も ら え れ ば 幸い で す 。 

すばらし い 性 能 を 持つ 表示 装置 が び ど ん どん 開発 され て いる の で 、 そ の 
使い 方 に 習 熱 すれ ば 、 マ イコ ン を 一 層 楽 し いも の に する で し よう 。 


MR 
se 


D 
W 
! 


を 
* 
we 
も 
4* 
電 
4 


as 
aa 
RB 
! 
W 
* 


1 


チュ デー ウリ ッ プ (プロ グラ ム P オ 19 


モミ の 本 (プロ グラ ム P 4 - 2) 


チ ユ ュー リッ プ ( 繰 り の 返し 、 プ ログ ラム P 4 - 3) 


NO 本 
県 1 詳 ( 間 
ーー 
MO 


| 


Im 


| 
iL LU 


本 
| 
中 


DU WNWBTUBMBTU MK 


| 
中 


wl | 


MM 
| 


HIT 
| 


MO 
| 


| 


| 
INNWC 富 じい 電 IUMENIINIIMYI 


骨 
| 
届 症 
山 


| 
よぶ ト 


1 月 1 


MAN 
| 


| 


是 WI 上 METI 目 
| 


RIOW 二 MHLWUuetetL 
1 


| Ke 
和 


の 0 
や つて みよ う @9 


0 
プラ フン 表 示 (もら っ て みよ ら 台 


UL]m 


ロロ 
111111 
1 つう 34S6Z899 12345 


ます する する 
81234S6789912345 
唱 一 一 重 参 ロ 
トレ ラ ? ロ 


IT コ へ ? 3 

すす イス る 
B1 つ 34S6789g 1 つき 345 
ーー ロロ 天天 g ロ 
トレ ラ ? 2 
ま 1 ヾ コ へ の お 8 

が る する る 
ら 1 つ うさ 4S6Z899 1 つき 45 


トレ ラ 2 較 


お し どり の 遊び (プロ グラ ム P 113- 1 ) 1 


B| F] 
いて 2 ドウ スウ うっ 8 上 ] ひい 
1 ユ 1 ユ 111111 つ つつ つつ つろ フク ク 
@123456789g 123456 ア 7899123456789 ) ⑥ 0 ひ 


ll Iml jml ml 」 
レー ラマ 


ロッ " ら 00900 
1 テ ァ 11111111 1 1 つつ つつ つつ 2 つろ 
912345678991234S6Z8B99123456789 E 1 ロ N 

0-- woeoeeo ら 0 い 090900 


2 る の の トコ ラ や デキ マズ スカ 
の テテ ァ 1111111111 つ つつ クウ 2 つ 2 
812 つ 34S678B99 1 つう 4S6ZB9981 つ 34S6789 
lel | Euel 」]m」 

トレ ララ? タマ 

ドコ へ 2 4 

づ テテ 1111111111 つ つつ つ ウ ウ クウ 2 
91234S67899 1 つう 34S6 ア 8B9981 つ 34S67 ア 89 
OO 旬 角 @ 電 ローー ロ ーーーーーーーーーーーーーーーーーーー 一 
トド ドレ ラ ? ロ 

で コ 、 220 の に の 

4 テッ ァ 41111111111 つ つつ クウ 22 ク 
9 1234S6Z8B991 つ 34S6 ア 8991 つ 34S67Z89 
ー 一 得 全 gg 〇 OOO 


テ ~ キマ シダ テン サイ ! 


モウ イチ ト ヾ トト ヾ ウソ ゞ 
イシ ノ カズ ~ < の ヾ ウズ スウ ぅ っ | | 


お し どり の 遊び (プロ グラ ム P13- 4 ) 


ひと り の 遊び デア 
(プロ グラ ハム P13- 6) 


、 ar た 

コ 四 ご 

華 三 ら 3 
等 等 Cy 埋 


| 


| 
| 


NICNINMIWMFCINILMNIS 


ウ ウ トイ マズ て ロ ノ ナカ “ドサ 、 オロ リ B) 画 


ルー レッ ツ ト 競 争 ( プ ログ ラム P15- 2 ) 


ロロ ロ 


カイ シー ノ フ ロロ ドンコ ~ ウ ? 一 


ルー レッ ト 盤 (プロ グラ ム P15-3) 


分 れ 道 ( プ ログ ラム P16- 2) 


ラン ダム 曲がり (プロ グラ ム P16- 3) 


り 返 し の 模様 (プロ グラム P20- 2) 


ら 


繰 


20 繰り 返し の 模様 


り の 返し の 模様 (プロ グラ ハム P20- 1 ) 


TE 
PRMU 


TOT 
PT 


THU 
JILRLPUN PL 
TLTTUTLTTU 
CNTLPUTTTLLL 
+m in EN Ni 
LT ME 
Re ュ E htt 


ET 


is is im 


FET 
mm Nis hh 
thktitms Tn 


ィ + 
に に 


と エ と エマ エンデ エッ テ エ ン ア エン ア エ 


と と エン デ エ ン デ エン エン デア エン デア エ マン 
こ ト イー ュ トイ キュ イー トイ キュ オキ ュ イ キュ イ 


お 城 ( プ ログ ラム P21- 1 ) 


家 と 庭 ( プ ログ ラム P21- 1 ) 


犬 (原案 : 織 邦子 ) 
(プロ プラム P21- 1 ) 


A/D 変 換 ( プ ログ ラム P25- 2 ) 


D/A 変 換 ( プ ログ ラム P25-2) 


Natiomnal 


技術 で ひら く 世 界 の 代 栄 


初め て だ か ら … 手 軽 な BASIC 学 機 。 


っ ゞ 


初め て パー ソナ ルコ ンピュータ を 勉強 し よう と いう 方 が た に 
向け て 、 ナ ショ ナル か ら 54,800 円 の 手軽 な BASIC 学 習 機 
JR-100》 が 登場 し まし た 。BASIC 言 語 入 門 の た ゅ の 
教科 書 $ 付 いて いま す の で 、 読み 進む うち に 、 自然 に コン 
ピュ ー タ の 基礎 が 学べ ます 

介 RAM16K バ イト を 実装 し 、32K バ イト まで 増設 で きま す 。 
介 豊 富 な グラ フィ ッ ク 記 号 を 採用 し まし た 。 

@ 34 種 類 ち も の コマ ンド を ワン キー で 入力 する こと が で きま す 。 
介 ユー ザー 定義 文字 機能 て パタ ー ン ・ 文 字 が 自由 に 作れ ます 。 


ご 家庭 の テレ ビ に つ な で だ け で ど な だ で も コン ピュ ー タ の 基 礎 が 学べ まま 


JR-100 結 話 54.800 円 パンク ンタ シー ブ ト 


ディ スプ レイ ケー プル 、 デ モン スト 
レー ショ ンプ ブロ グラ ム テ ー プ 、 ユー ザー ズ マ ニュ アル 付き 念 寸法 : 幅 29.6X 高 さき 4.5X 奥 行 15.4cm 
重 さ : 約 700g( 本 体 )※ ビ デオ 接続 端子 の な い ご 家庭 の テレ ビ と 接続 する 場合 は 、 別 売 RF コン 
バー タ (JR-R01 標 準 価格 7.500 円 ) が 必要 で す 。 久 別売 専用 CRT デ ィ ス プレ イ (TR-|20MIC 
標準 価格 47.800 円 ) 別売 プロ グラ ム 記 憶 用 テー プレ コー ダ (R0Q-2739 標準 価格 10.600 円 ) 


-// // 2 


アベ 
トル // 2 
トン 


松下 通信 


@ お 問い 合わ せ は …… 松 下 通信 工業 株 式 会 社 電卓 事業 部 
〒226 横浜 市 緑 区 佐江 戸町 600 番 地 電話 (045)932-1231( 代 表 ) 


高度 な 要求 に 応え る ・ 
ビジ ネス 専用 入門 機 


IF800 を 買っ た お 客 様 か ら も 8「 ゲ ー ム ソフ ト は ?」 
と 開か れる こと が あり ます が 

IF800 に は ゲー ム ソ フ ト は あり ませ ん 。 

2 パ ツ コ ン と いう と ゲー ム を 連想 する 人 が いま す が 
ホビ ー で な いか ぎり 、 も う パ ソコ ン で ゲー ム を する 時 代 は 

終っ た の で は な いで し ょ うか >。 

まだ た 、 パ パソ コン に 慣れ る た め に ゲー ム を と いう 会 社 も 
ある よう で す が 、 反 射 神経 を 養う な ら と も か く 

あま り 5 意味 が な く 、 ゲ ー ム は 、 あ (まで ゲー ム で す 。 

や は 0 り ビジ ネス で 使う な ら 、 入 門 機 で も 、 本 格 的 に 

ビジ ネス ユー ス で 使え を る パソ コン で あっ て は ほしい 一 一 

こん な 立場 に 立っ て 創 ら れ だ た 一 一 それ が IF800 モ デル 10 で す 。 
価格 的 に も $、 普 通 の パソ コン で 本 体 と 拡張 イン タフ ェ ー ス 

そし て ブリ ンタ を 揃え れ ば 、 優 に 30 万 円 を 超え ます の で 

29 万 8 千 円 は 、 け っ し て 高く は あり ませ ん 。 

まだ た 、 シ ステ ム ア ッ プ ' の ため の オプ ショ ン 製 品 や 

ビジ ネス 用 の 各種 ソフ ト も 、 類 を 見 な い 豊 富 き で す 。 
詳し ぃ い 哀 料 が あり ます 。 下記 まで ご 請求 下さ い 。 


[】 


@ 


mo 


、 時 吊 


RYPRmmrmrersneeerem 


\298,000 
て も @ 主 な 仕様 : 高速 Z-80A CPU プ 64K バイ ト ・ メ イン メモ リ ぞ 5X7 ド ッ ト プ リン タグ RS-232C、 ラ イト 
SE ペン 、 カ セッ ト 、ROM な どの イン タフ ェ ー ス 内 蔵 / 漢 字 カ ー ド な ど 豊 富 な オプ ショ ン 製 品 が 揃っ て いま す 。 


@ お 問合せ は 沖 電気 工業 株 式 会 社 : OA 事 業 部 営業 第 3 部 NHK 係 〒!08 東 京都 港 区 芝 蒲 4-10-3 
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デメ S 
の 


NK 講 座 2 : 
スモ コン 係 


Hh 員 36 766 虹 胞 DoKWPTA 0 和 公 hy 


TuiNS 呈 編 6 に 了 “ 

所 漠 ヤー 材 二 で っ の 人 
KWHAS 要 2 の ye ANーH 人 ト 、 
〇 ・<・ ヒ ーーー 

と ク に を O 

っ 6 己 政 xsNS 斉 圭 が 
KWPHA 人 SNnAAN3 十 裳 G 中 認め | 夏 つ や AN トム Hf て 
〇 ・ で ビーー" 素 咽 Si 一 入 史 敵 団 生計 獲 や 嘱 剛 
志 D 拉 陣 や リ で SG 酔 翌 め 玖 竹 ロビ 26K ン さく ミ 


NN つつ 所? 合 一 氷 亡 翼 G 詩 全 % 生 6 生 己 ポ つが 
〇 ・ で * ピ ーー 注 庫 wsNG 症 串 


@ 詳 い お 知 り に な 5 た い 方 は 、 資 料 請求 券 を ご 郵送 くだ きい 。 


札幌 (011)231-1313 仙台 (0222)66-4151 水戸 (0292)24-8934 新潟 (0252)43-2111 : 資料 請求 券 


(0472)24-1651 大 宮 (0486)41-9122 横浜 (045)312-1991 静岡 (0542)51-2488 


2 岡山 (0862)22-8228 高松 (0878)33-2933 広島 (082)244-4615 福岡 (092)411-2894 
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昭 ビュー ツク の 用 四 革命 と は 。 


1982 年 7 月 、 ハ ンド ヘル ドコ ンピュータ HC -20 が 、 世界 に 先がけ て 、 全 国 で 発売 に 
な り ま し た 。 発表 以来 革命 機 と し て セン セー ショ ン を 巻き お こし て いる コン ピュ ー タ 
で す 。 人 間 の 住 空間 より 広い 体積 を 必要 と し た 初期 の 大 型 コ ンピュータ 、 つ いで 
ミニ コン 、 そ し て パソ コン へ と 、 人 類 の 開発 し た 電子 頭脳 は 、 年 月 を 要 し な が ら も 、 
確実 に 進化 の ステ ッ プ を 踏ん で きま し た 。 そ し て 、 つ い に 人 体 の 一 部 と し て 、 ど こ へ 
で も 持ち 歩け る と いう 夢 の コ ンピュータ が 実現 し た の で す 。 


交通 ど 通 信 の 発 眉 で ます ます 狭 て な っ て 行 〈 世 界 。 そ の 中 で 現代 人 は 、 膨 大 な 時 の 
情報 を 処理 し て いか な けれ ば な り ま せん 。 で すか ら 、 私 た ち に と っ て コン ピュ ー タ は 


いま や 、 必 携 の も の と いっ て も 過 寺 で は あり ませ ん 。 ビジ ネス に 


研究 に 、 ホ ビー に と 現 代 人 の 日 常 生 活 に 十 二 分 に 
応え うる 能力 と と も に 人 間 工 学 
に も と づい た 使い や すい 理想 
の カタ チ ( 重 さ は 約 1.7kg、 大 き ミ 
は A4 の ブッ クサ イズ で 超 コ ン パ クト な が ら 


グラ フィ ッ ク 可 能 の プリ ンタ 
備 。 し か も キー ボー ド は 最も 使い よい タイ プラ イタ ー 型 を 採用 
し 、 マ イク ロカ セッ ト と と も に オー ルイ ン ワン 設計 。 も ちろ ん 電源 は 
長 時 間 コ ー ド レス 使用 が で きる NiCd 電 池 も 内 蔵 ) を 備え た エプソン の HC-20 
は 、 ど こ で で も 自由 に 使え る 、 ほ ん と う の 意 味 で の パー ソナ ル ・ コ ンピュータ で す 。 
社会 の 発展 は 新しい ツー ル を 求め 、 技術 の 半 命 は 新しい 生活 文化 を 拓 い て いき ます 。 
コン ピュ ー タ の 大 衆 化 を めざす エプソン が 成し遂げ た 「 第 四 の 半 命 」。 世界 は 変り ま 才 


プ 77 ん ezo/222 ハン だ が へ ヘル だ ば エフ ツン ン 


EPSON 


HC-20 本 体 価 格 (AC ア ァ アダプタ 付 ) \138.600 
オプ ショ ンプ ター ミナ ルフ ロッ ピー TF-20X、 パ ー ソ ナル カプ " ラ CP-20、 マイ クロ カモ ッ ト ドラ イズ 、 拡張 ROM、ROM カ ー ト リッ ジ 、 拡張 ユニ ッ ト 、 デ イス プレ イア ダブ " タ 


と 見 や すい 液晶 表示 を 装 


a0 答 / これ か 王 〇 世 IND - ず で す / 
こい エボ バイ ンド -J いや すさ で / 痛 人 し まみ 


EPOC フ ァ ミ リ に EPOBIND-J が 加わ り ま し た 。 パソ 
コン は 、 い ま オ フィ ス で 様々 に 大 活躍 。 そ の 日 か ら 、 
し か も 誰 に で も 使え る EPOC フ ァ ミ リ 。EPOCALC-J 
の 作 表 ・ 計 算 機能 と 、EPOBIND-J の 分 類 ・ 検 索 
機能 。 この 2 つの 機能 で 、 オ フィ ス の 処理 を すべ て 
カバ ー い た し ます 。 
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Y29g9,999 
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Y28.999 
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\1.929 
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日 本 語 分 類 ・ 検 索 パ ッ ケ ー ジ EPOBIND-J 

も ちろ ん プログ ラミ ング 不要 、 も ちろ ん 日 本 語 の 「 分 類 ・ 検 索 
ッッ ケー ジ 」。 い わ ば 、 バ イン ダー に 綴じ られ た デー タ を 出し 入れ 
する パッ ケー ジ で す 。 例え ば 月 報 か ら 期 報 ・ 年 報 の 作成 、 
デー タ の 昇順 ・ 降 順 へ の 並べ 換え な ど 、 営 業 部 門 か ら 管 理 
部 門 ま で 幅広 い 業 務 で 見 や すい 資料 の 作成 が で きま す 。 


日 本 語 作 表 計 算 パ ッ ケ ー ジ EPOCALC-J 15 ビッ トバ パー ソナ ルコ ンピュータ 
プロ グラ ムレ ス で その 日 か ら 、 し ヵ も 日 本 語 で 使え る 「 作 表 ・ 計 算 


1 
( PANAFACOM こ ファ ミリ 
バン ーッ アワ し 1 を 折 吊 だ は て 2 の 0 や 


レイ アウ ト を 自由 に 作っ て いた だ け ま す 。 デ ー タ の 変更 も 、 項 目 0-180K (フロ ッ ピ イ シス テム ) 本 体 価格 ………………… 990.000 円 
間 の 関係 式 を 定義 し て な け ば 、 関 連 す る すべ て の デー タ が 自動 


C-180DK (ディ スク シス テム ) 本 体 価格 ………………… 1.580.000 円 
的 に 再 計算 きれ る な ど 、 作 表 ・ 計 算 の 手間 が 大 幅 に 省け ます ※ プ リン タ ・ ソ フト ウェ ア 等 は 本 体 価格 に は 含ま れ ま せん 。 


/ ヾ で ナブ プア 4 株 式 佐 杜 @ お 問い 合わ せ 
エ 東京 営業 所 〒105 東京 都 港 区 新橋 6-17-15( ナ ショ ナル ヒル 別館 ) 会 (03) 438-0311 代 

大 阪 営業 所 〒530 大 阪 市 北 区 堂島 1-5-17( 堂島 グラ ンド ビル ) 容 (06) 344-3648( 直 

PATN 久 正久 で OM LIMIT ED 名 古屋 営業 所 〒450 名 古屋 市 中 村 区 名 駅 4-6-18( 名 古屋 ヒル 4F ) 容 (052)581-0701-3 

本 社 〒242 神奈 川 県 大 和 市 深見 534 TEL(0462)64-3351 履 福岡 営業 所 〒812 福岡 市 博多 区 博多 駅 前 1-5-1( 朝 日 生命 福岡 ヒル ) 容 (092)472-7056 
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とこ テア ここ 者 で To ラ ここ こま るい TS や こ 


:640 ※ 200 ド ッ ト : | 画面 卒 FFP-1000 は 640 


ッ ク 表 示 
所 @$ イ ンタ フェ イス MTL/F (300/ 1200 ボ ー) 、 プリ ンタ |/F (セン ト 


ミニ フロ ッ ピ ビー ディス ク ( 片 面 単 密度 ) :75.000 円 / ミ ニ フ 


こよ り 8 ス ロッ ト ま で 拡張 ) @ 寸法 /450(W) ※ 310(D) x 85(H) (本 
ッ ク :35.090 円 / で C MOS_RAM フ パック: 40.000 円 /EP-ROM 用 パッ ク :10, 


湊 字 ROM バ 
ッ ク :25.000 円 / 拡 張 し O ボ ポッ クス :65.000 円 10 月 以降 順次 発売 手 定 (ミミ ニプロ ッ タ プリ ンタ は 来春 発売 子 定 ) 


写真 は FP-1100、 プ リン タ ・CRT・FDD・|/O ボ ックス は オプ ショ ン で す 。 


ッ ク 家 示 :640 ズ 200 ド ッ ト : 3 画面 ・640 ※ 400 ド ッ ト : | 画面 、 カ ラー グラ フィ 
ー ム 仕様 @ キ ー ボ ー ド JIS 標 準 配 


ラ レ ル ) ゅ 汎用 拡張 スロ ント. 2 スロ ント 内 蔵 (外部 拡張 ボッ ク 
体 ) ゃ オプ ショ ン / 12 グリ ー ン CRT:39,800 円 /14" カ ラーORT:79.800 円 /14 高 解像度 カラ ーOCRT:168,.000 円 /RF モ ジュ レー タ : 


< 主 な 仕様 > ゃ ご PU/ メ イン プロ セッ サ :Z-80A コ ン バ チ (4MHz)、 サ ププ ロ セ ッ サ :8 ピ ッ ト マ イク ロブ プロセッサ wROM/ メ イシ: 36KB 
サブ:8KBeRAM メイ ン :64KB、 サ プ : 48KB(FP_ 1000 は Ii6KB) ゅ 画面 表示 テキ スト 表示 :80 字 25 行 、40 字 25 行 、 モ ノ ク ロ ー 


ロッ ピー ディ スク (両面 倍 密度 ) : 298 000 円 


デメ 200 ド ッ ト 1Wi 仙 の モノ フク ロー 
000 円 /RS 232C バ 


ム グ ラ フィ 


ロバ 
| 12.000 円 / ミ ニプロ ッ タ プリ ンタ : 49.800 円 / グ ラフ ィ ッ ク プ リン タ : 139.800 円 


アカ シフ 計 等 徐 朱 式 雲 を 


〒|60 東 京都 新宿 区 西新 宿 2-6-| 新 宿 住 友 ビ ピル 容 (03)347-4811⑯ 


左記 の 請求 券 を 
ハガキ に 貼り 、 ご 請求 くだ さい 


資料 を ご 希望 の 方 は 


FP_1000(Y 98 ,000: 本 体 価格 )/FP_1100(YI28,000: 本 体 価格 )10 朋 発売 予定 


マレ ナチ 1O が * 


本 格 的 な 業務 に 対応 する た め に 、 い ま 
I16 ビ ピッ ト の マル チ |6。 


複雑 な 業務 を 効率 よく 処理 する た め に 、 マ ル チ 16 
は 16 ビ ピッ ト CPU を 採用 し まし た 。 こ の クラ ス 最 大 の 

大 容量 メモ リ を サポ ー ト する だ た め 、 よ り 大 き な ソ フ 
トウ ェ ア が 使え 、 よ り 効 率 の いい 処理 を 可能 に し ま 
し た 。 BASIC、COBOL、FORTRAN な どの 高 


未来 を 開発 きる 


IO ビッ ト は 、 


価 が で きる の ?7 


お 答え し ます 


級 言語 の 駆使 、 各 種 の プロ グラ ムレ スパ パッ ケー ジ 、 
0 また 、 日 本 語 処 理 、 

通信 回 線 サ ポー ト な ど 豊 富 な 機能 を 盛り 9 こみ まし 
た 。 オ フィ ス 内 の デー タ 処 理 や 各種 事務 処理 、 技 
術 計算 分 野 で の 数 値 計算 や 統計 処理 、 計測 
デー タ 処 理 、 そ し て 教育 分 野 ま て 幅広 い 業 務 用 
途 に 余裕 を も っ て 対応 で きま す 。 


プロ グラ ム を 作ら ず に デー タ 処 理 が で きる 
マル チ 16 の Multiplan# 
日 常 業 務 の 中 で 、 タテ と ヨコ の 表 を 使う 計算 ・ 作 表 
の 仕事 は 不可 欠 で す 。 る 
れ で いて 手 作 業 で は 、 時 
間 と めん どう る が 増す ば か 
0。 そこ で マル チ 16 は 、 プ 
ログ ラム レス 言語 の Multi- 
plan( 汎 用 デー タ 処 理 言 
語 ) を 用 意 し まし た 。Multi- 
plan な ら 、 プ ログ ラミ ング を 
まっ た 〈 ご 存 知 な て も 画面 
に あな た が 必要 と する 表 を 
自由 に 作成 で きま 


著 中 は と <Wt 功 温 の mm の NH 人 


構成 され て いま す 


この 画面 は 、「 販 売 予測 表 」 の 作例 で す 
ヨコ 63 項 目 ま で て 入力 可能 


文字 や 数 値 の 書き こみ や 項目 と 項目 、 複数 の 
項目 どう し の 演算 を させ た り 、 修 正 し た り が 
カー ソル の 移動 だ け で か ん た ん に で きま す 。 


た と えば 、 販 売 管理 や 経営 管理 、 経 営 子 測 、 

算 と 実績 対比 、 決 算 シ ミュ レー ショ ン な ど が お どろ 
〈 ほ ど 簡 単 な 操作 で 、 ど な た に も 作れ ます 
操作 は 簡単 その も の 。 画 
面 と 対話 し な が ら 表 示 
の 操作 手順 に 従う だ け 
日 々 の デー タ 処 理 の 手順 を 
ワー クシ ー ト 上 へ 定義 し て お け 
ば 、 あ と は 電卓 な み の 手 軽 き 、 
簡単 さ で 作 表 で きま す 。 わ ず 
ら わ し い 事 務 処 理 か ら 解 放 
され る マル チ 16 の Multiplan。 
まる に 「OA」 の 先取 り が ここ か 
ら 始 まり ます 


コマ ンド は アル ファ ベッ ト 順 に 配列 され 、 使 いや すく 


(* 吾 Multiplan は マイ クロ ソフ ト 社 、CIS-COBOL は マイ クロ フォ ー カ ス 社 、CP'M 86 は デジ タレ リサ ー チ 社 の 登録 商標 で す ) 


人 @ 高 級 言語 M-BASIC、CIS-COBOEFORTRAN 
を 駆使 /i8087 サ ポー ト で FORTRAN に よる 高速 演 
算 処理 可能 旬 Multiplot( 作 用 ファ イ ) 
AP -1( 集 嘉 ) な ど 汎 用 、 業 務 用 パッ ケー ジ も 豊富 に 

用 意 信 漢 字 約 500 字 種 か ら 約 4.000 字 種 (3 し) 
@16 ビ ッ ト CPU(ao8g 装 備 俺 主 記憶 装置 は 最大 384 
KB まで 拡張 可能 旬 0S は CP/M-86* 久 640X400 ド ッ 
ト の 高 解像度 ディ スプ レイ / グ リー ン E8 色 フル カラ ー 


)、Data Box( 針 


4 人 8KB 
キー ボー ド 


MP-1601 5 全 73zm( 喘 ) 
MP-1602 32 PTN 者 


MP-1605(2 と を の) 1 の 3 ヵ n( 可 


@ 上 記 3 機 種 の 標準 柱 衝 に ス 3 アロ ン M-BACIC」 を 含み ます 


NOHiI6 


三 待 ハー ソナ ルコ ン ピ ュ ー ア 


L// ヶ 7/! に 人 人 で 「 最 先 半 


バージ シナ ルコ ンピュータ 


ルル チ が - 人 < 東京 > マルチ が 人 く < 大 阪 > 


」OA 機 器 を ご 覧 くだ さい 


お 問合せ は 


三菱 電機 株 式 会 社 〒!00 東 京都 千代 田 区 丸の内 2-2-3 


ルル チ が - 人 < 名 古屋 > 


本 社 パ ー ソ ナル コン ピュ ー タ 部 (03)2I8-3543 


〒!4| 東京 都 品川 区 西 五反田 !-26-5  〒530 大 阪 市 北 区 堂島 2-2-28 〒450 名 古屋 市 中 村 区 名 駅 3-28-12 又は 下記 支社 へ タロ グ 請 求 券 
日 10 時 1 時 関 上 時 間 :… 平 日 10 大 名 古 量 TEE(G8278699 @ 和 札幌 (0i1)212-3738 。 @ 仙 人 台 (0222)64-5656 : マルチ!6 
IS - 平 日 10 時 一 18 時 30 開館 時 間 … 平 k 
夫 は 2 5 時 30 分 17 時 @ 新 潟 (0252)4!-7220 @ 富 山 (0764)42-2328 
@ 名 古屋 (052)565-3252 @ 大 阪 (06)347-242| : 8209 
@ 広 島 (082)248-5268 @ 高 松 (0878)51-9783 あな た の 電 記 
福岡 (092)721-2346 H 


人 


き 画面 の グラ フィ ッ ク ( / 革 ラフ ホー ト を 使用 し た 例 て 


応用 自在 の メモ リ 構 成 で 、 新 し い 言 語 や 周辺 機器 【 の シス テム チェ の ョ ー 
ンジ を 可能 に し た クリ ー ン コン ピュ ー タ MZーー 一 使い こむ ほど に 、 
ヽ こく 8 SE ー ソ ナル ーー 標準 価格 218.000 円 
上 達する ほど に 進化 する パソ コン と し て 圧倒 的 な 支持 を 得 て い ます 。 パー ソナ コン ピュ 
由 っ [ Sys クセ ュ フ _- ちと <10 型 ダリ ー ン CRT・ 電 礎 メ カカ モッ ト デ ッ キ 標 準 装備 > 
IMZ- 2000 は 、 こ の 「 ク リー ン , 」 を 究め た 名 機 MZ-80B を さら < 完 李 の クリ ーション ピュータ に よる し い 先進 の 機能 > 仙 CPU に 
- グ レー ドア ッ フ * カラ ー グ ラフ イッ ク 対応 な どー 区 グラ 4MHz の 高 機能 Z-80A 搭 載 但 アド レス 空間 64K バ イト 、 オ ー ル 
に グレ ー ド アッ フ 5 カラ ラフ イッ ク 対 応 な ど 一 段 和議 の の WE53 か ら お ナ ム 凍 線 和 6 ラー 
ィ ッ ク 機 能 ( オ プシ ョ ン ) を 誇る 新鋭 機 で お MZ を 超え る の は MZ、 表示 、 白 黒 時 3 画面 を 駆使 で きる ハイ レベ ル な グラ フイ ッ ク 機 能 
( 各 ォ オプ ション) 氏 両 面 倍 密度 フロ ッ ピー、136 桁 プリ ンタ 優れ た 
いま 究極 の クリ ー ン コン ピュ ー タ と 呼ぶ に ふさ わし い MZ-2000 の 誕 周辺 機器 に 加え て 、 、GP-IB な ど 標 準 イ ンタ ー フ ェ イ ス も サ 
: ボー ト さ れん た 完璧 な ペリ フェ ラル ファ ミリ ー 借 PASCAL シ ステ ム プ " 
生 で 、8 ビ ッ ト パ ッ コ ン ほ は 完 壁 の 次 元 へ と 飛翔 し ます . ログ ラム 、FDOS 等 多彩 な ソフ トウ ェ ア サ ポー ト 。 


セー 欠 株 式 会 社 本 社 〒545 大 阪 市 向 倍 野 区 長池 町 22 番 22 
は ご 3 容 (06)621-1221( 大 代表 ) 念 お 問い 合わ せ は … 本 社内 商品 信頼 性 本 部 
気軽 に SPY び 以 下 シ ャ ー プ エン ジニ アリ ング へ 鍋 北 海道 (011) 64 6 


スキ ンシップ 。 先 進 の 思想 カ < K -4649・ 関 越 (0286) 3)893-4649・ 北 陸 (( 
り ~46 5 コ 中 国 (082)874- 4649・ 四 国 
ハイ フォ ー マ ンス を 手 に 入れ た 42 人: ュ コ ・ 池 細 09ee)62 


【 27 * 
バー ソナ ルコ ン ピ ビュ ー 


標準 価格 148,000 円 


1 


124 ブロ グラ ム の 仕組 み 


@@ 放 送 日 1 月 5 日 ( 水 ) 欠 再 放送 日 1 月 9 日 (日 ) 


いよ いよ 後 半 に 入り ます 。 新 し い 気 分 で マイ コン へ の 理解 を 深め て ゆき 
まし ょ う 。 後半 も いろ いろ な マイ コン の 使い 方 を , 例題 を 中 心 に し て , 勉 
強し ます 。 マイ コン は どの よう に 利用 きれ る の か プロ グラ ム と は どう いう 
も の か , そこ で の 基本 的 な 考え 方 は 何 か 、 な ど を 少し で も 理解 する に し た 
が っ て マイ コン の 楽し さ は 一 層 増 し て ゆく こと で し ょ う 。 


処理 を 行い 、 人 間 に 対 し て その 結果 一 一 出力 ー 


ーー ココ 
mA 一 を 与え る も の で す 。 例え ば, 第 11 回 の 幹 葉 表 示 
が ま SS1B 回 選 っ て , いろ いろ な プロ グラ で は , 図 2 の よう に , 入力 と し て 数 値 が 入っ て き 
SAI の Mt て 出力 と し て 幹 葉 表 示 が 得 ら れ ま す 。 そ の プロ グ 
の 基本 的 な こと を まとめ て み ま し ょ う 。 ラム は 入力 の 数 値 を 受け と り , その 数 値 を 分 解 し 


一 般 的 に いっ て , プロ グラ ム は 下 の 図 1 の よう た り , 出力 の 準備 の 処理 を 行っ て , 最終 的 に 幹 葉 

に 刀 罰 と な る デー タ や 情報 に 対し て 。 何ら か の 表示 と し て 出力 する と いう 手順 を 繰り 返す も の で 
に 

入力 | 加 上 プロ グラ ム の 一 つの 見 方 は この 間 に ど の よう 

な デー タ の 流れ が あっ た か に 注目 する も の で す 。 


図 1 プロ グラ ム の 働き 


幹 葉 表 示 の プロ グラ ム で は , 変数 メ , 1 , ZZ と 配 
列 F が 使用 され , ます 入力 の 数 値 一 た と えば 95 
夫 Me は 共 に 覚え られ , 幹 (9) と 葉 (5) に 分 解 さ れ , それ 
RA ・98, 76. 82、 ャ ーー 位 較 較 ド ぞ れ 1 と Z に 覚え られ , 同時 に その 幹 に 対す る 何 
7*le 番目 の 葉 で ある か の 情報 が F( 1 ) に 記憶 され ます 。 

図 2 幹 葉 表示 9*|58 そし て 1 番目 の 幹 の F( 1 ) 番 目 の 葉 と し て 画面 に 
表示 され て いま す ( 図 3 参照 ) デ ー タ の 流れ に 着 


記憶 装置 


売 | F(!)= 3 


0* 
] ※ 
2 来 
3 玉 
4 
5 
6 *※ 
7 ※ 
8 
9 * 
0 * 


図 3 幹 葉 表示 で の デー タ の 流れ 
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目 す る と き に は , プロ グラ ム で 使用 され て いる 配 
列 を 含め た 変数 の 使用 目的 と その 値 の 変化 を 理解 
する 必要 が あり ます 。 デー タ の 流れ が 複雑 な プロ 
グラ ジム で は | 

・ 一 つの 変数 は 一 つの 目的 の た め に 使用 する 

・ 使 用 目的 が わか りや すい 名 前 を 付け る } 

こと に 注意 する と よい で し ょ う 。 

プロ グラ ム の も う 一 つの 見 方 は , 処理 の 流れ 一 一 
制御 構造 と ちい いま す 一 一 に 注目 する こと で す 。 
let 文 や print 文 だ け か ら な る プロ グラ ム の 部 分 は 
単純 な 流れ と いわ れ , 行 番号 の 順に 実行 され て 
ゆき ます 。 if-then 文 や goto 文 は 処理 の 流れ を 変 
え , 分 岐 と 飛び 越し の 流れ と いえ ます 。 さらに, 
for 文 は 繰り 返し の 流れ を 作る も の で す 。 プ ログ 
ラム の 処理 手順 を 考え る と き は この 三 つ の 流れ , 


単純 な 流れ 
分 岐 と 飛び 越し の 流れ 
繰り 返し の 流れ 


を 念頭 に 置く の で す 。 
較 プ ログ ラム P13-3 を 例 に 


前 回 に 楽し ん だ “お し どり の 遊び " の プロ グラ 
ム P13-3 (76 真 表示 5 ) を と りあ げ て , その 処 
理 の 流れ を 見 て み ま し ょ う 。 次 の よう に 書く こと 
が で きま す 。 


お し どり の の 遊び の 概略 手順 
*< 
< 
準備 と 初期 設定 を 行う 
@ 石 の 表示 に 用 いる 文字 列 L$, M$, AS を 作る 。 
@ 石 の 初期 の 場所 を 左側 に と り , 石 を 置い て ある 
場所 に 対し て 配列 C の 要素 を 1, 石 の な い 空 い 
て いる 場所 に 対し て 配列 C の 要素 を 0 と する 。 
@ 石 の 状態 を 表示 する 。 
@ 完成 する まで 以下 を 反復 する 。 
判定 の 結果 , 完成 し て いな いと き 


@ | 次 の 手 の 入 力 と その 手 の チェ ッ ク を 行う 
@ | 石 の 移動 を 行う 
完成 し た と き 


@ | 成績 の 表示 を 行う 
次 の 手 の 入 力 と チェ ッ ク 


@ 動か す 二 つ の 石 の 左 の 番号 を 入力 する 。 
@ そこ に 石 が ある か チェ ッ ク し , あ れ ば 次 へ , 
な けれ ば 再 入 力 を 促す 。 
@ 移動 先 の 場所 の 左 の 番号 を 入力 する 。 
@ 移動 先 が 空 いて いれ ば 次 へ , 空い て いな け 
れ ば 再 入力 を 促す 。 
きら に 詳細 な 部 分 は 省略 し ます が , この よう に 
処理 を 部 分 的 に まとまっ た 単位 で 理解 し , 反復 や 


4 処理 の 流れ の 記述 の 原則 


* は 単純 処理 や ひと まとまり の 処理 に 
用 いる 


と は 分 岐 に 用 いる 


+ た いて い の マ イコ ン で は 変数 の 名 前 に , 
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ここ で 使っ て いる より 長い 名 前 を 付け る こと が で きま す 。 


分 岐 の 構造 を 捉え る こと が 大 切 で す 。 こ こ で の 計 
述 の 原則 は 図 4 を 見 て 下さ い 。 


較 BASIC に つい て 


この 講座 で は プロ グラ ム を BASIC と 呼ば れる 言 
語 で 書い て いま す 。 BASIC は Beginner's All- 
purpose Symbolic Instruction Code の 頭 文字 を と 
っ た も の と いわ れ て いま す 。 と 同時 に 基礎 的 ( ベ 
ー シ ッ ク ) と いう ひび きも あり , 特に 初心 者 に と 
っ て 取っ つき や すい 言語 と し て 愛好 され て いま す 。 

BASIC に 限ら ず プ ログ ラミ ング 用 の 言語 は 人 工 
的 に 作ら れ た も の で 文法 が きま っ て いま す 。 これ 
まで も ある 程度 の 文法 を 習得 し て き て いる の で す 
が , 言語 の 習得 は , 習う より 慣れ ろ で , 多く の 実 
際 の プロ グラ ム を 読み 書き し , マイ コン に 話し か 
け て ゆく の が 早道 で す 。 こ れ ま で すでに いろ いろ 
な 文 や 指令 , その 他 の きま り が 使わ れ て きま し た 。 
し か し ,。 この 講座 で は , これ か ら 後 半 の 例題 を と 
お し て 反復 し て 実際 の 使用 例 が 見 られ ます の で , 
それ に 触れ る こと に よっ て 身 に 付い て ゆく と 思わ 
れ ま す 。 


圏 マ イコ ン へ の 話し か け と 即時 実行 


これ まで は プロ グラ ム を キー ボー ド か ら 打 ち 込 
ん だ り , 補助 記憶 装置 か ら load し て , それ を 実行 
(run) し た り , 画面 に 表示 (ist) し た り し て マイ コン 
を 使っ て きま し た 。run や list の 指令 は , 行 番号 を 
付け た 行 の 集まり で ある プロ グラ ム と 違っ て , 指令 
を 打っ て [RETURN] キー を 押す と すぐ に 実行 され 
ま A2 だ 5 

実は , 現在 の た いて い の マ イコ ン で は primt 文 や 
let 文 な どの 文 も 行 番号 無し に 入力 する と , すぐ に 
その 1 行 だ け を 実行 し て くれ る の で す 。 こ の よう 
使い 方 を 即時 実行 と か 直接 実行 と いい ます 。 と 
ころ で , 使っ て いる と き の マ イコ ン の 状態 に は , 
Ok が 表示 され て 人 間 か ら の 指令 を 受け 付け る 状態 
と , プロ グラ ム や 指令 を 実行 し て いる 途中 の 状態 
と , も う 一 つ input 文 を 実行 し ? を 表示 し て 人 間 か 
ら の 入力 を 要求 し て いる 状態 が あり ます 。 指令 や 
即時 実行 は 第 一 の Ok が 表示 され た あと (画面 の 操 
作 で Ok の 表示 を 消し た と し て も ) に 限り ます 。 よ 
く , 入力 要求 の ? の と ころ で 指令 を 打っ て うま く 
いか な いこ と が あり ます 。 指令 が うま く な いと き 
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は 図 キ ー を 打っ て みる の も 一 つの 方 法 で す 。 [この 
ほか に スク ロー ル の 指定 や カラ ー の 指定 を あや ま 
っ て 何 を 打っ て も 画面 が 見 えな いこ と も 起こ り ま 
す 。 その と き は 落ち 着い て , console 文 を 使っ た り 
color 7 の 指定 を し て み ま す 。] 

と ころ で 即時 実行 の 使用 例 を 示し て お きま し ょ 
う 。 表示 1 を 見 て 下さ い 。 まず, 電卓 の よう に 
print 文 の あと に 式 を 書い て , その 値 を すぐ に 求め 
る こと が で きま す 。 次 に 表示 2 を 見 て 下さ い 。 let 
文 に 変数 を 代入 し て お いて , 他 の 文 で 使う こと が 
で きま す 。 こ の 機能 を 使っ て 文字 処理 の 関数 の 働 


表示 1 即時 実行 


0k 
PP1n 七 4+5※6 
34 


0k 
PP1n 七 4※5+6 


PFP1nt 36/(2+4 ) 
6 
0k 


表示 2 即時 実行 


0k 


et a=250 let は 省略 で きる 


PFPint 95/a※bj "を 
妥 き (を 
0k 
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表示 3 即時 実行 (文字 処理 ) 


0k 

A ま = "0123456789abcdef" 

0k 

?1en(a も ) ーー この ? は print と 同じ 
16 働き を し ます 。 

0k 

?] ee 千本 (a ま 。6) 

012345 

0k 

? ロ ュ gh せ 呈 ( a ま 7 ) 

9abcdef 

0k 

?m1d(a,8,4 ) 

789a 


8 


表示 4 即時 実行 (文字 処理 の つづ き ) 


0k 
a ま = "abcdefghi jk に “ 
0k 

?in ら tr(a ま 。"k”) 


?1instr(a ま 。"n”) 


0k 

b ま ="ghi 

0k 

? ュ 1nS モ (aa まま 。b ま ) 
ィ 

0k 

?a+ す "1mn" 


abcdgefghi jk 1 mn 
0k 


き を 復習 し て み ま し ょ う 。 表示 3 と 4 を 見 て 下さ 
い 。 こ の よう に , 文 や 関数 の 働き に 疑問 を 持っ た 
と き は 即 時 実行 で 確認 する こと が で きま す 。 な お , 
表示 3 と 表示 4 で 使っ て いる 疑問 符 は print 文 の 
print と 同じ 働き を し ます 。 

即時 実行 の 便利 な 使い 方 は 。 プロ グラ ム を 作る 
過程 で 問題 が 生じ た と き , run 指令 の 実行 を 終っ 


た あと で その プロ グラ ム で 使わ れ て いる 変数 の 値 表示 5 即時 実行 (プロ グラ ム P12-1 の 実行 後 ) 
を 確認 で き る こと で す 。 その 例 を 表示 5 に 示し て 
お きま す 。print 文 で 印 演 する こと を 忘れ た と き に 
便利 で し ょ う 。 なお, 再び run 指 令 を 行う と 変数 の 
値 は いっ た ん ゼロ に な る (文字 変数 な ら 空 の 文字 
列 を 値 と する ) の が 普通 で す 。 


( 國 キ ー を 押し て 中 断 し た あと Break in 110 
の メッ セー ジ は 消え て いる ) 


後半 を 始め る に あたっ て , プロ グラ ム の 基本 に 
つづ USC 考え で (が ま レ た だ 。 


ーーーーーーーーー ゆ 2 あ あー ーー 


① 即時 実行 の 例 の 表示 1 一 4 を 自分 で も や っ て ⑨ ニニ つっ 以 上 の 文 を コロ ン : で 区 切っ て 即時 実行 
みて 下さ い 。 を し て みて 下さ い 。 
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動 交 を つけ る 


念 放 送 日 | 月 12 日 ( 水 ) 


出 て きた も の で す 。 
で 中 MS 


念 再 放送 日 1 月 16 日 (日 ) 


社会 の で き ご と に は , あら か じ め 子 想 や 予測 の つか な いこ と が た くさ ん 
あり ます 。 偶 然 や 不 確 実 さ の ある 事柄 を 理解 する に は 確率 の 考え 方 が 役 に 
立ち ます 。 確率 の 考え 方 は を も そ も サ イコ ロ や ルー レッ ト な どの 遊び か ら 
"乱数" を 使っ た マイ コン の 遊び か ら 確 率 に つき あっ 


較 ど こ に と まる か な 


図 1 の よう に 円 形 に 並ん だ 〇 印 の 上 を ぐる ぐる 
と めぐ っ て ゆき , いずれ 止ま る の で す が , どこ で 
止ま る か は あら か じ め 子 想 で き な い と し まし ょ う 。 
た と えて みれ ば , まわ っ て いる ルー レッ ト 盤 に 投 
げ 込 まれ た 球 が 何 番 の 場所 で 止ま る だ ろう か , と 
SD いそ CNT 。 

こん な こと を マイ コン の 画面 で や っ て みせ る に 
は , 次 の 三 つ の こと が 必要 で す 。 


@ @ 
7 多 人 @2 
6 g 人 … ぅ 
@ @ 
図 1 5 4 


表示 1 読み 込み と 表示 


10 REM P15-1 ルー レ ゅ ト 
20 DIM X(32 ) 。Y( 32 ) , Z(32 ) 


40 PRINT CHR$(12): 


60 READ N 

70 FOR 1=1 TO N 

80 READ X(1),Y(1),Z( 
20 LOCATE X(T),Y(T)s 
100 PRINT の 

110 NEXT I 
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30 CONSOLE 0,25,0,1:MUIDTH 40。25 一 一 色 つ き て 40x25 の 画面 使用 
つ 0 REM ーーー ヨミ コミ ト ヒョウ シラ" -ー-ー 


1 ) 
COLOR Z(1) 


・ 画 面 に 図 1 の よう な 図 を 表示 する 。 
・ ぐ る ぐる まわ っ て いる よう に 見 せる 。 


・ で た ら め な 番号 の 場所 で 止め る ー 一 “で た ら 
め ” と は 止ま る 場所 の 了 予想 が 普通 に は で き な い 
どい つこ)PSKSS85。 


カラ ー 頁 (85 真 ) に も 画面 の 写真 が あり ます か 
ら 見 て 下さ い 。 


圏 凶 の 表示 


図 の 表示 は , print 文 だ け で 図案 を 作る よう に 単 
純 な 文字 列 の 印字 と し て 行う こと が で きま す が , 
ここ で は , 図 に お ける 旬 印 の 画面 上 の 位置 
標 一 一 を data 文 と し て 用 意 し て , その デー タ を 
read 文 で 読み 込ん で , locate 文 で 位置 を 指定 し て 
か ら , 倫 印 を 印字 する こと に し まし ょ う 。 こ の 方 
法 な ら , 自分 の 好き な 図 の 表示 に も 利用 で きま す 。 


座 


ーー 画面 消去 
X : タテ の 座標 
Y : ヨコ の 座標 


Z : 色 番 号 


あと で "ぐる ぐる まわ り " を させ る た め に , 図 の 人 
印 の ヨコ と タテ の 位置 は それ ぞ れ 配列 X と Y 
に 記憶 し て お きま し ょ う 。 

あと で 全体 の プロ グラ ム を 見 せま す が , 図 1 の 
表示 を 行う 部 分 を 表示 1 に 抜き 出し ます 。 こ の プ 
ログ ラム で は , 1 番目 の 倫 印 の 位置 の 座標 を 配列 
X メ と Y の 第 1 要素 X( 1 ) と Y( 1 ) に 記憶 す る ほか 
色 の 符号 も 指定 し て それ を Z( 1 ) に 入れ る よう に 
し て あり ます 。 色 の 待 号 と 色 の 名 前 の 対応 は 次 の 
と お り で す 。 


春の 2 赤 。 3 柴 。 4 縁 
5 水色 , 6 黄 , 7 白 , 0O 黒 (印字 な し ) 


色 の 指定 は color 支 で 行い , 色 を 使う と き は , 
console 文 で 

console 0, 25, 0, 旨 
の よう に 4 つ 目 の 数 値 を 1 に し て 実行 し ます 。 

locate 文 は も う 何 回 も 使っ て きま し た か ら , 
お な じみ で し ょ う 。 色 ( カ ラー) を 使う と き , 画面 
の 大 き さ は width 40.25 と する な ら 横 が 0 か ら 38, 
縦 が 0 か ら 24 で 使い ます 。 


圏 ぐ る ぐる まわ り 


図 の 借 印 の と ころ を ぐる ぐる まわ る よう に 見 せ 
る に は 「 番 号 順 に , 代 印 を いっ た ん 消す か 別 の 色 
に し た り し て , すぐ に も と の 欠 印 に 戻し , 次 の 番号 
に 進む 」 と いう こと を 繰 り 返 し ます 。 こ こ で は , 

@@ 印 を 〇 印 に 変え る と と も に 色 を 補色 に する 

@ 次 の 位置 へ 進む 


表示 2 ぐる ぐる まわ る 部 分 の 中 身 


COLOR 7-Z(J) 
LOCATE _X(J) ,Y(J) 
PRINT 'O" 


COLOR Z(J) 
LOCATE X(J) ,Y(J) 


J=J+1: IF J>=N+1 THEN J=1 


と いう 手順 を 採用 し て いま す 。 試み に , 色 の こと 
は 考え な いで 次 の 2 つの プロ グラ ム を 実行 し て み 
て 下さ い 。 
① 

10 FOR 1I=0 TO 30 

20 LOCATE 1。15xPRINT " 欠 


0 EOCATE 上 、459RRTNTS 
40 NEXT 1 


② 


10 FOR !=O TO 30 

20 LOCATE IL,15:PRINT “の 
30 LOCATE 1,15:PRINT 「O' 
40 FOR K=0O TO 100:NEXT K 
50 LOCATE 1,15:PRINT "@ 
60 NEXT I 

7Q GOTG 10 


② の 結果 は 最初 は 豊 が 描か われ る よう に 見 え , 繰り 
返し に 入っ て か ら は 下 の 図 の よう に 中 抜き の 〇 が 
動い て いく で し ょ う 。 止め る と き は 較 キ ー を 押し 
て 下さ い 。 
例 旬 移 償 人 の 人 ゆい) 人 SP の の の の 人 の の (あの 9D の Sr 
な お , ② の 中 で 行 40 の tor 文 は 何 の 仕事 も し な い 
で 空 ま わり する 時 間 か せ ぎ の た め の も の で , 〇 
印 を ゆっ くり 動か す 役目 を し ます 。 

そこ で , 表示 2 を 見 て 下さ い 。 この プロ グラ ム を 
反復 し て 実行 する と ぐる ぐる まわ る よう に 見 える 
の で す 。 表示 の 中 に 書き 込ん だ 説明 を 読ん で 下さ 
い 。 その 中 で 

IF 」>=N+1 THEN 」=1 

と いう 正 -then 文 が あり ます 。 こ の よう に , 現在 の た 


ithen 娘 の あと に 文 を 書い て よい 
補色 を と る 


いた ん だ ぐに も て 


ここ を ルー プ に する 


PRINT "@' 


すぐ 旬 に も どす 
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表示 3 
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プロ グラ ム P15-1 


REM P15-1 ルー レ ゅ ト 
DIM X(32), Y(32) , Z(32) 
CONSOLE 0,25,0,1:MIDTH 40,25 
PRINT CHR$(12)。 
REM -ーー ヨミ コミ ト ヒュ ョ ウシ" ーーー 
READ N 
FOR 1=1 TO N 
READ X(1{ ),Y(1I),Z(1) 
LOCATE X〈1 ) , Y( 1 ):COLOR Z(1) 
PRINT "人 
NEXT 1 
REM -ーー カイ シ / ノ "ンコ " ウ ーーー 
COLOR 7 ま 
LOEATE' SN6PTNPUT 1= ニ 8">J | 
REM --- マ 9 レ マウ レ --- 
M=N+RND( 1 )xNx10 キーーーーmm ま わる 回 数 を デ タ ラ ジ は 決め も 
FOR 1=1 TO M 生か 
J=J+1 : TF J>=N+1 THEN J=1 | 
COLOR 7?-Z(J) | 
LOCATE X(J),Y(J) 一 ぐる ぐる まわ る 
PRINT 'O' | 
COLOR 7Z(J) 
LOCATE X(J),Y(J) | 
PRINT 「@" | 
NEXT ] YO 
REM ーーー トマ ゥ タ トキ ノ ショ リ ーーー 
COLOR Z(J) 
LOCATE X(J) ,Y(J):PRINT JI 
COLOR ?:LOCATE15,17:PRINT 3 ] 時 
COLOR Z(J):PRINT TAB(20 )  " を 
COLDR ? 
GOTO 140 
DATA 8 デーーーーーーー@ の 数 
8 、 > と < 
DATA 14,2,3 
DATA 14,4,6 
BATA 12. る 。3 
人 TA 40.6。8 
DATA 8,4,3 0 2 
AT 衣 き ら 光 26 BS に 同 FR 座標 は (12.0) 
DATA.36.0。3。 」 | 


END 2 | あ ) 


開始 の 俺 印 の 番号 を 入力 


っ た 場所 (変数 ) の 値 ) を 〇 印 に 


ま 
る 
7 Ak その 色 の 介 印 
表示 す 


⑤⑯ 〇 


) で ⑤) 


っ )(o)( 
こ ン ペン 
Co 


ー ヽ 


(⑨( 


いて い の マ イコ ン 用 の BASIC の 正 then 文 は then 
の あと に 文 を 書く こと が で きる の で す 。 今 後 こ の 
使い 方 が 出 て くる で し よう 。 な お , 色 の 補色 は 
重ね る と 白 に な る 対 の 色 で , 番号 の 和 が 7 に な る 
も の が た が い に 補 色 と な り ま す の で 。 行 190 で は 
7 一 ZZ(I) と いう 色 の 指定 を し て いま す 。 補色 に 
し た の は , そこ を , も と と 同じ 色 に し た の で は 動 
き が め だ た な く な る た めで す 。 


圏 で た ら め な 止め 方 一 乱数 の 利用 一 


BASIC で は 。 RIND 
まま?9ee ま :95 の 人 る の 側 
RND 
・ 普 通 ラ ン ド と 呼ん で 
CC 


と いう お も し ろ い 関数 が 使 


: い ます 。 
0 と 1 の 間 の 乱数 (デタラメ な 数 


random number、 ラ ンダ ム ナ ン バ ) を 出し て く 
SA 
・ 機 種 に よっ て 
で は 普通 
RND1) 
の 形 で 用 いま す 。 
・ 例 えば , 次 の プロ グラ ム 
の 数 字 が で た ら め に 作ら れ , 
使え ます 。 実行 結果 は その つど 違う 系 列 を 出し 


6 まう 8 


5 は 多少 異な り ま す が , ここ 


を 実行 する と 1 か ら 6 
サイ ギコ 当 が まめ 回 


10 for ji=1 to 10 

20 print 1nt(rnd( 1 )X6)+15 
30 next† 1 

un 
1 
0k 


ho お 2 る 9 


INT(RND(1)*6) 十 1 は 例え ば , 
いう 値 が 出る と , これ を 6 倍 し て 2.04、 これ を 1 
NT で 整数 化し て 2, これ に 1 を 足し て 3 に な る 


RND(1) で 0.34 と 


準備 を 終り , 表示 3 の プロ グラ ム P15-1 
い 。 行 160 で 


M=N+RND(1)*N*10 


き を 説明 し て お きま し ょ う 。 


と あり ます 。 こ の M は その 下 の 行 170 の for 文 の 繰 
り 返 し の 終り の 値 を 与え ます 。 N は 表示 され る 欠 
の 数 で すか ら , 以下 を N 回 反復 し て 円 形 を 一 まわ 
り と な り ま す 。 M は 少な く と も N, 上 限 N \11 ま 
で の 間 の 値 を と り ま す 。 結局 , 円 形 を 少な く と も 
=< 敵 ss 多 ゆ れれ ば 中 周 まで で で だ ら な ど 思 人 で 計 


まり ます 。 
その ほか プログ ラム P15- 1 で は 行 140 で I の 
初期 値 . つまり, どの 位置 か ら ま わり は じ め る か 


の 値 を 入力 し て も ら う よう に な っ て いま す 。 ま た , 
止ま っ た あと , どの 位置 で 止ま っ た か わか る よう 
に その 場所 を 〇 印 に し , 別に 番号 と 色 つ き の 夫 を 
表示 し て いま す 。 行 ご と の 説明 は 表示 の 中 に 書き 
込ん で ある の で 読ん で 下さ い 。 


較 ルー 


テキ スト の 紙 の 上 で は 動き が わか り に くい の で 
と に か く 。 マイ コン で 実際 に 動く と ころ を 見 て も 
ら え る と よい と 思い ます 。 


これ を いろ いろ な 形 で 応用 し て 遊ぶ こ 


レッ ト 盤 て 遊ぼ う 


と が で き 


ます 。 表 示 4 (実際 は 色 つ き で すか ら カ ラー 頁 も 見 
て くだ さい 。 85 頁 ) は プロ グラ ム P15-2 (表示 5, 


次 真 参照 ) を 実行 し た 画面 で 1 番 か ら 8 番 が ナ 
2 25 が サキ ニー 式 ま ツク 、 テ ドル ショ ヨン 

と いう 競争 を する も の で す 。 子供 達 は 結構 楽し ん 
で くれ ます 。 付録 に は 倫 印 が 38 個 の 円 形 盤 の プロ 
グラ ム P15-3 が あり ます 。 ルー レッ ト の よう な 規 


則 を 自分 で きめ て 遊ん で 下さ い 。 


表示 4 プロ グラ ム P15-2 の 実行 例 


志和 導 グ まこ と の ワウ 


| OOOO 
DOOOOOOO 


3 oeooo ら な の らら 


OO 
生け 〇 OOOOO 


スカ 〈 〇 ノ フ ナカ ^ サ 、 オ ワ リ @〉>? 開 
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プロ グラ ム P15-2 競争 


320 
400 
410 
420 
430 
440 
450 
460 
470 
480 


KEN P15-2 
昌 縛 関 YK が 析 me 
DIM X(8),Y(8),Z(8),F(8) 
CONSOLE 0,25,0,1:MIDTH 40,25 
A ま = OOOOOOOOOOOOOOOOOOOOOOOOOOOOOO "ーー 有 技 場 の 表示 に 用 いる 
M=10 ーー は じ め に 競技 場 の 長 さ を 10 に 
REM Ye ヨミ コミ 2 する (次 か ら は 変え られ る ) 
READ N 
FOR 1=1 TO N 
READ X(1),Y(1),Z(1) 
NEXT I 
REM ーーー カ " メ ン ヲ ケラ シテ 八 あ "メル ーーー < 競技 の 繰り 返し の と きこ こ に 戻っ て 再開 
PRINT CHR$ ま (12): ャ ーー 画面 を いっ た ん 消去 
どー 
FOR 1=1 TO N 
LOCATE X(T),Y(I):COLOR Z(1) 
PRINT 人 @" 
LOCATE X(T)+10,Y( II ):PRINT 1 一 横 に 番号 を 表示 する 
NEXT 1 6 
REM ーーー キョ ウキ "シラ" ョ ウ ノ ヒョウ シ " ーーー 0 記 
COLOR ィ 競技 場 の 表示 
FOR J=1 TO N 
F(J)=0 
LOCATE 0,12+J 
PRINT Ji" 1" 3LEFT ま (A ま も 。M)j "1" 
NEXT J Ri 
LOCATE 0,11 


OOO OOO 
OO OOD 
OQO OOO 
| OOO OOO 
OOG2reO ひ DO 
1|OoOO OOO 
PRINT "ナン ハル" ン カ " サキ ニ ユキ ツク テ * ミ ショ ウ " | 〇 OO 〇 OOO 
REM ーーー マリ レ マウ レ ーーー OO の OO:OOO 
FOR 1=1 TO N+RNDK1 )xN こい 
J=J+1 iTF J>=N+1 THEN J=1 
LOCATE X(J) ,Y(J) :COLOR 7-Z(J) 
PRINT "の " 
LOCATE X(J),Y(J) :COLOR Z(J) 
PRINT 「'@' 
NEXT 1 
REM ニーー トマ 9 タダ トキ ノ シラ ョ リ ーーー 
LOCATE X(J) ,Y(J) 
COLOR Z(J):PRINT 'O' 
F(J)=F(J)+1 0 村 
LOCATE 3+F(J) ,12+J:PRINT "'@" 一 一 計る た 番 守 に つい て 重 技 場 で 〇 に 色 を 
IF F(J)=M THEN 440 ェ ーー 」 の 勝ち 
GOTO 290 
REM -ー- ツ ツ * ケ ルカ ーーー 
LOCATE 0,23:COLOR 7 
INPUT " ツ ツ * ケ マ ス カ ( 〇 / ノ ナカ " サ 、 オ ワ リ 0) "3M 一 次 の 競 技 の 長 さ を 入力 
IF M>0 THEN 120 ーーW が 0 な ら オ ワリ 
PRINT "オォ 9 ウリ" :LOCATE 0,0 TS HG 


面 で の 長 さ は 30 ま で し か 出 な い ) 


6 いい の の お OO ご 


次 頁 に つづ く 
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表示 5 (つづ き ) 


420 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 


540 DATA 
550 DATA 
っ 60 DATA 
S70 DATA 
580 END 


FOO は R は は は は は O 


乱数 を 使っ た 遊び を 紹介 し まし た 。 どこ で 止ま 
る か は 確率 的 に は 等 し く て も 結果 は バラ ツク こと 
を 味わっ て 下さ い 。 
① 乱 数 

RND と いう 関数 は 0 と 1 の 間 の デタラメ な 数 を 
与え ます 。 こ れ を 使っ て , 不 確 実 さき を 伴う 現象 を 
コン ピュ ー タ で 真 仏 し て , その 現象 を 分 析 す る こ 
と も で きま す 。 
⑧ 画 面 で の 動き 

消し た り , 色 を 変え たり , ある い は 印 を 変え た 


り し て , 画面 上 で の 動き を 表現 する こと が で きま 
す 。 動き の 早 さ を 遅く する に は , 

for k=1tow:nextk 
の よう な for 文 を 使っ て , w の 値 を 変え る こと に よ 
り 可能 に な り ま す 。 ルー レッ ト 盤 で 止ま る と き に 
は ゆっ くり と 動く よう に する と お も し ろ い で し ょ 
の SS か 8 プロ グラ PE 5 は に 

215 for k=1 to 1 
を 入れ て みて 下さ い 。 


・ next k 


ーー MS ーーーー 


① 本 文中 の ①(95 頁 ) の プロ グラ ム を 実行 し て か 
ら 。 これ を 逆 方 向 ( 右 か 左 ) に 動く よう に 変え 


て 下さ い 。 


⑨② 本 文中 の ⑨②(95 頁 ) の プロ グラ ム に つい て も 同 


じ よ うに 逆 方 向 に 動く よう に し て 下さ い 。 

⑧⑬③ へ ビ の よう に くね くね し た 図 を 〇 印 で 作り , 
プロ グラ ム P15-1 の プロ グラ ム の data 文 を と り 
か えて や っ て みて 下さ い 。 
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16 ラン ダム に 進む 


念 再 放送 日 1 月 23 日 (日 ) 


1 つ 碁盤 目 の 街 並 を 歩き , 四つ角 に 来る た びに 、 
骨 ラメ に 決め る と し ます 。 


真直 ぐ 進 むか 曲がる か デ タ 


どこ へ 行き つく で し ょ う 。 マイ コン を 使っ て 実験 


し て み ま し ょ う 。 この よう な 実験 を と お し て デタラメ 感覚 な ら ぬ 確率 感覚 


間 P" 2 


を 身 に 付け る こと が で きる で し ょ う 。 


較 道 路 の か わり に 


図 1 の 地図 を 見 て 下さ い 。 
南 ( 下 ) に 行く か 東 ( 右 ) へ 行く か デタラメ に きめ て 


1 区 画 進 み ま す 。 次 の 交差 点 で また 南 か 東 か の 方 


向 を ヂ デタラメ に きめ て 進み ます 。 こ の よう に し て で て 


4 区 画 分 の 距離 を 進む と ⑦, ①, ②⑦, ⑤, ④ の い 
ずれ か の 交差 点 ま で くる で し ょ う 。 画面 で は 図 2 


y の A か ら 出 て , デタラメ に 南 
狐 か 東 に 進む 。 交差点 に きた 
グ / ら ま た デタラメ に 南 に 行く 
の か 東 に 行く か きめ る 。 
図 1 街 並 を 進む 
ヨ ヨ 記 #!6%) 
0 2 3 4 
A 
Or を WC 0 3 
B C D 
ュ ト O-O--O @ 
レイ 1 
2 ド O ⑨ る 
SA 座標 (2, 2) 
を ドド 2 6 
4 ト | @⑦ 〇 は 交差 点 
図 2 進ん だ 例 
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左上 隅 の A 点 に 立ち , 


の よう に , 道路 の か わり に 交 差 点 を 〇 で 表し て 並 
のど に 才 N9s が かがり. に に 図 人 2 の 人 べ 。 B、 1@5 
D, EE の 順に 進ん だ と し ます 。 図 2 に 書き 込ん で 
ある ヨコ (X ) と タテ (Y ) の 目盛 を 使っ て , 点 A か 
ら E の 位置 座標 一 一 を 調べ て み ま し ょ う 。 
A は (0, 0) 
紀 は (0) 
C は . (1。。 1) 
D は (2. 1) 
選 は . (2 2) 
と な り ま すね 。 A か ら E の 座標 の 変化 を 見 る と , 
ヨコ (XX) ま た は タテ (Y ) の 一 方 だ けが 1 ふえ て ゆく 
こと が わか り ま す 。 あ る ( 変 差 ) 点 の 座標 を (x、y) 
と する と , 次 の 点 は 
東 ( 右 ) に 進む と き (x 十 1, y) 
南 ( 下 ) に 進む と き (x,y+1) 
に な る わけ で す ( 図 3 )。 
この よう な 進み 方 を サイ コロ を 使っ て 実験 する 
こと が で きま す 。 A 地 点 に 立っ て サイ コロ を 振り , 
その 目 が 奇数 な ら 下 に , 偶数 な ら 右 へ 進む こと に 
し ます 。 これ を 繰り 返し て 図 2⑦ か ら ④ の どこ に 
きた か 記録 し て ゆけ ば よい の で す 。 


3 (x, y) か ら 次 へ 


圏 マ イコ ン に よる 実験 


人 間 が いち いち サイ コロ を 振っ て 実験 を し て い 
て は あま り 多 く の 回 数 は で き な い で し ょ う 。 こん 
な 実験 は マイ コン で 素早 く 行 うこ と が で きま す 。 

プロ グラ ム を 作る に は , 実験 の 手順 を 考え て お 
く 必 要 が あり ます 。 考え を まとめ て ゆく に は , ま 
ず 実 験 の 大 ま か な 手 順 を 思い 浮か べ , 主要 な 部 分 
を と りあ げ て み ま す 。 こ の 実験 な ら 

画面 上 の 表示 を どう する か 
道 の 進み 方 を どの よう に する か 
と の 二 つ の 点 が ポイ ント で し ょ う 。 

次 に その 二 つ の 点 を こま か く 考 えて 一 一 設計 し 
て 一 一 ゆき ます 。 画面 上 の 表示 は , 表示 1 の 
よう に 画面 の 左上 の ほう に O 〇 印 を 三角 形状 に 並べ 
る こと に し まし ょ う 。 ま た , 最後 に 到達 し た 回 数 
は その 横 に 数 字 で 示し た ら よ いで し ょ う 。 

進み 方 は 次 の よう に 考え られ ます 。 点 の 座標 
を X( ヨ コ ) と Y( タ テ ) の 変数 で 覚え て お く こ と に 
し ます 。 

@ ま ず , Xー0:/Y 三 0 と する 。 つ まり, 出発 吉 

を 左上 隅 に し ます 。 

@ 以 下 を 5 回 (一 般 に は N 回 ) 繰り 返す 。 

@ 誠 数 を 発生 させ る 。u テ rnd(1) と し まし ょ う 。 

@ そ の 乱数 u が 0.5 よ り 小 さい な ら x を 1 だ け 
ふやし 一 一 下 の 方 向 に 進み 一 一 , その 乱数 
u が 0.5 以 上 な ら y を 1 だ け ふ や す 。 


表示 1 画面 上 の 交差 点 


表示 2 プロ グラ ム P16-1 


REM P16-1 

20 X=0:Y=0O 

30 FOR 1=1 TO 5 

40  U=RND( 1 ) 

コ 罰 1 りく 。 つ . ト NEN、 = ェ X ト エ 
60 IF U>=.5 THEN Y=Y+1 
70 PRINT _U,XsY 

80 NEXT 1 

END 


表示 3 プロ グラ ム P16-1 の 実行 (3 例 ) 


un 
。245124 0 
・305003 と 3 
・31 1866 9 
は せら は に 人 を 
.0583136 し 
0k 
un 
・788891 1 
・497102 5 
・363751 る 2 
・284546 ビア 4 
・201591 と 本 まこ ] 
0k 
un 
・727313 し 
6.83401E-03 NH 
・26243 を 
1 46 に) Sc( 和 
・256225 を] 
0k 


画面 上 の 表示 を 気 に し な けれ ば , この 進み 方 の 
処理 部 分 が 重要 な 点 で すか ら , この 部 分 を プロ グ 
ラム に し て 調べ て み ま し ょ う 。 プ ログ ラム は 表示 
0 の お 1 ほな が の GE の 5 
途中 経過 を 見 る た め に 行 70 に print 文 が 入れ て あ 
り ま す 。 これ を 3 回 ほど 実行 し て 印字 され た 結果 
が 表示 3 で す 。 乱 数 に 応じ て 進ん で いる こと が わ 
か る で し ょ う 。 表示 3 で の 第 3 回 目 の 実行 で は , 
6.83401E 一 03 や 1.7514E 一 03 と いう 乱数 が 印字 さ 
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れ て いま すね 。 エ 一 03 は 「 小 数 点 を 左 に 3 けた ず 
ら す 」 と 解釈 し て 下さ い 。6.83401E 一 03 は .006 
83401 の こ と で す 。 逆 に , 例え ば 1.04858E 十 06 の 
場合 。 E 十 06 は 「 小 数 点 を 右 に 6 けた ずら し て 」 
1048580 と いう 数 値 を 表し ます 。 

次 に , 進ん で ゆく 途中 の 様子 を 表示 1 の 画面 に 
図 的 に 出す 工夫 を し て み ま し ょ う 。 これ は 前 回 も 
や っ た よう に , 進ん だ 差 点 の 座標 (X, Y ) を 使 
っ て , その 点 を いっ た ん 色 つ き の 欠 印 で 表示 し , 
その あと 〇 印 に 戻し て や れ ば よい で し ょ う 。 

さら に , ⑦ か ら ④ に 到達 し た 回 数 を 配列 F に 数 
える こと に し ます 。 その た め に は , ⑦ か ら ④ の 座 
標 (X, Y ) の 一 方 , た と えば X メ を 使っ て 

F(X)=F(X) 二 1 
と すれ ば よい で し ょ う 。 斜め に 並ん だ 点 の 座標 は 
04) ぶ (3)、 (89), (3.1)、 (640) の よう に , X 
+Y が 一 定 で , 一 方 の 値 が わか れ ば 他方 が 出 ま す 。 


keil 
和 
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以上 を まとめ る と , 全体 の 手順 は 次 の よう に 書 
け ま す 。 
分 れ 道 実験 の 手順 
<| 准 備 
表示 
e | 突 際 の 株 返し | 
@ 進む 回 数 N と 実験 の 繰り 返し 数 M を 入力 する 。 
@ 画面 を いっ た ん 消去 を する 。 
@ 表示 用 の 〇 印 の 用 意 と し て 変数 A に 〇 印 を 
16 個 並べ た 文字 列 を 作っ て お く 。 
@ 到達 回 数 を 数 える 配列 F の 値 を F(0) 一 F(N) 
に つい て ゼロ に する 。 
表示 
@ 色 を 黄色 (color 6) に する 。 
@ ij を N 十 ] か ら 1 まで きざみ 一 1 で 変え 
@LEFTS(AS,[) を 印字 する 。 ( 〇 印 の 逆 三 
角形 が で きる 。) 
実験 の 繰り 返し 
@ 以下 を M 回 反復 する 。 
@ XX と Y を ゼロ に する 。 
@ 色 を 緑 に し て (color 4).(0.0) に 供 印 を 印字 
する 。 
@ 色 を 白 に し て (color 7), (0,0) を 〇 印 に 戻す 。 
@ 以下 を N 回 反復 する 。( 進 行 の 過程 。) 
@ 誠 数 を u に 作る 。 
@u ぐ 0.5 な ら xーx 十 1 と する 。 
@u 全 0.5 な ら y テ ッ y 二 1 と する 。 
@ 色 を 緑 (4) に し て , (X, Y) に 倫 印 を 印字 。 
@ 色 を 白 (7) に し て , (X, Y) に 〇 O 印 を 印字 。 
@F(X) を ふやす (到達 回 数 の カウ ント )。 
@F(XX) を (X,Y) の 右 の (X 二 2, Y) の 場所 に 印 


回 
| 


字 -。 
@" オ ワリ "と 下 に (N+2 行 目 ), 印字 する 。 


行 220 と 310 に は 進む 速度 を ゆる め る た め の 時 間 

か せ ぎ 用 for 文 を 入れ て あり ます 。 こ の for 文 の 終 

この 実験 の プロ グラ ム を 表示 4 に し て お きま り の 値 を 適当 に 変え て 何 回 も 実験 し て みて くだ さ 
す 。 そこ に 書き 込ま れ て いる 説明 も 読ん で 下さ い 。 い 。 


圏 プ ログ ラム 


表示 4 プロ グラ ム P16-2 


遇 人 
10 REM P16-2 7 カレ ミチ 

20 CONSOLE 0,25,0,1:MIDTH 40,25 
30 DENM F で 155 

2 ta 

50 INPUT "スス ム ヵ カイ ス 9(15 マテ *")「jN 

60 INPUT "クリ カエ シ ス 9「jM 

70 PRINT CHR ま (12)} 

80 A ま =" OOOOOOOOOOOOOOOO" 

90 FOR Ii=0 TO N 


100  FKXI)=0 間 の 
110 NEXT 1I 5 

120 REM --- ヒュ ョ ウラ" ーー 

130 COLOR 6 

140 FOR 1=N+1 TO 1 STEP -1 」 2 

150 PRINT LEFT$(A$, 1 ) OOO 。 と いう 形 を 作る 
160 NEXT 1I 8 

170 REM --- クリ カエ シ ーーー 

180 FOR K=1 TO NM の 2 人 
190 X=0:Y=0 ゃ ャ ーーーー 点 (0,0) か ら 出 発 


200 COLOR 4 

210 LOCATE 0,0:PRINT 
220」 FOR J=1 TO 100:NEXT J デ ーー 一 時 間 か せ ぎ 
230 。 COLOR 7 

240 LOCATE 0,0:PRINT 「O' と 
250 FOR I=1 TON W 六 ke 
260  U=RNDK( 1 ) 
270| | FU く 5 THEN X=X+1 で 本 一 有人 進 む 
280 | | IF U>=.5 THEN Y=Y+1 テーー 下 に 進む 
290 COLOR 4 

300 LOCATE X,Y:PRINT 
310| | FOR J=1 TO 100:NEXT J キ ーー 時 間 か せ ぎ 
320 COLOR 7 

330 LOCATE X,YiPRINT "O" 
340 NEXT 1I 

350 | F(X)=F(X)+1 

360 | LOCATE X+2。Y:PRINT F(X) デ 一 到達 回 数 の 印字 


370 NEXT K 

380 REM --- オリ リ ーーー 

390 LOCATE 0,N+2:PRINT " オ 9 リ " 
400 END 


BNCE2OGI HYPER は REPRISG2 CMD 
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圏 実験 の 結果 


知 数 を 使っ て いる の で , 実行 の た びに 配列 F に 
数 えら れ て いる 到達 回 数 が 違い ます 。 どん な 具合 
に バラ ツク か 見 て み ま し ょ う 。 N= テ 4, M= テ 16 で 
10 組 反復 実行 し た と き の メ モ が 表 1 で す 。10 組 の 
合計 と 平均 が 計算 され て いま す 。 点 (2.2) に は M が 
16 回 の 実験 中 平均 6.1 回 き て いる こと が わか り ま 
す 。 20 組 分 の 結果 を グラ フ に し た の が 図 4 で す 。 
も っ と 多く の 実験 で は , 点 (2.2) に は 32,000 回 中 
11 ,937 回 到達 し , 16 回 あたり の 平均 で 5.97 で し た 。 


表 1 N=4, M テ 16 の 実験 で の 各 点 へ の 到達 回 数 


(10 組 反復 ) 

回 点 ア イ ウ 王 オ 
1 1 5 6 3 1 
の 3 3 6 4 9 
(1 0 o) 4 5 2 
4 1 3 8 4 0O 
5 1 有 グ ア 3 1 
6 の 由 4 5 1 
本 2 3 ア 4 0D 
8 1 3 6 6 0 
9 2 の 4 6 中 1 
10 ba) 4 3 3 

計 14 34 61 38 13 

平均 人 5 が 條 いら SS AS 


2 


の 〇 は Do の O 尽 mm ひひ -uoooo 


と 
+ー 
3 

ーー の つか ラサ ーー 


ご へ 
に 


* (2.2) の 点 
+ (0.4) の 点 


4 到達 の 回 数 の 変化 
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だ いた い 16 回 の うち 6 回 は (2, 2) の 点 ウ に くる こ 
と が わか り ま す 。 

この こと は A 点 (0, 0) か ら 出 発し て , の ⑦⑦②⑤ 
④② の それ ぞ れ に 遠 ま わ り せ ず に 行け る 道 の と り 方 
の 場合 の 数 を 調べ て みる と わか り ま す 。 そう いう 
場合 の 数 は 次 の よう に 調べ て ゆき ます 。 図 5 を 見 
で 下さ Wo まず 。 人 A が か がら B ま だ で に 行く に ば ぱ : 瑞 と 
お り の 道 し か あり ませ ん 。 次 に D, E, F に つい て 
は , D は B か ら だ け , 下 は C か ら だ けし か 行け ま 
せん 。 し か し EE は B と C か ら こ られ ます か ら , A 
か ら E へ は B へ の 1 と C へ の 1 を 加え て 2 と お り 
と な り ま す 。 次 の G。 H, 1 J で は ,. た と ど え ば ん が 
ら 是 へ は (D か ら H か , E か ら H へ 行く こと に な 
り 。 D の 1 と EE の 2 を 足し て ), 3 と お り と な り ま 
す 。 最後 , の -ー の に つい て も 同様 に 計算 し て , ⑦ と 
⑦④ は 1 と お り , ⑦ と は 4 と お り , ② は いち ば ん 
多く 6 と お り の 場合 が ある こと が わか り ま す 。 A 
か ら ⑦ー④ へ の 場合 の 数 の 合計 は 1 十 4 十 6 十 4 十 1 
で 16 で すか ら , A か ら 出 発し て ⑦ に くる 確率 は 高 
と な る わけ で す 。 プロ グラ ム の 実行 で 一 回 の 実験 
の 繰り 返し 数 M を 16 に と っ た の は , この 理論 と 比 
較 し や すく する た めで し た 。 実験 で ⑦ に くる 回 数 
が 16 回 中 6 回 に 近づく こと が うな づけ る で し ょ う 。 
一 般 に , さら に 道 を さき に と っ て も , 道 の と り 
方 の 数 は 簡単 に 求め られ ます 。 その 結果 を 図 6 の 
よう に 並べ て 図示 する こと が よく あり ます 。 こ れ 


〔【Aー ウ は H の 3 と 1 の 3 を 加え て 


ア 6 と お り と な る 〕 


図 5 A か ら 出 て 各 点 へ 行く 道 の と り 方 の 場合 の 数 


図 6 パス カル の 三角 形 


乱数 を 使っ た 実験 は , 世の中 の 複雑 な 不 確 実 現 
象 を まね て コン ピュ ー タ で いろ いろ と 分 析 し て み 
る の に 使わ れ ま す 。 この よう な 実験 を 模擬 実験 一 
ジミ ュ レ ーション 一 一 と 呼ぶ こと が あり ます 。 
① プ ログ ラム を 作っ て ゆく 過程 を みて 下さ い 。 
処理 の 主要 部 を 大 ま か に と り 出 し , これ を だ ん 
だ ん と 詳細 化し て ゆく よう な 方 法 を 一 般 に ドッ 
プ ダ ウン 一 一 上 か ら 下 に の 天下 り 方 式 一 一 の 考 
え 方 と いい ます 。 逆 に 部 分 的 な 要素 を 考え た り 集 
め た り し て だ ん だ ん と 全体 に まとめ て ゆく 方 法 を 
ボトム アッ プ 一 一 底 か ら 上 に の 積み 上 げ と か 底 
上 げ 方 式 一 一 と も いい ます 。 両方 の 考え 方 を うま く 


を パス カル の 三角 形 と 呼ぶ こと が あり ます 。 こ の 
形 の イメ ー ジ で 表示 を 楽し くし た 実験 の プロ グラ 
ム P16-3 は 付録 (183 頁 ) に の せ て あり ます 。 表 
示 画 面 は カラ ー 真 (85 真 ) を 見 て 下さ い 。 


使い 分 け て , 処理 手順 を よく 考え る の が プロ グラ 
ム を 早く 作る こつ で す 。 
②for 文 と 洛 -then 文 

ー] を きざみ と する for 文 の 使い 方 が で て きま し 
た 。for 文 の 一 般 形 は 

FOR 変数 初め の 値 TO 終り の 値 STEP きざみ 
で す が , きざみ を 負 の 値 に し て , だ ん だ ん と 減ら 
す 方 向 に 変数 の 値 を 変え て 反復 する よう に も 使え 
9ja 

i-then 文 の then の あと に 文 を 書く こと が で きま す 。 
前 回 も 出 て きま し た が , た いて い の マ イコ ン で こ 
の 形 が 使え ます か ら 試 し て 下さ い 。 


ーーーーーーーーーーー ゆ っ て 妥 あ ーーーーーーーーーーーーーーー 


① P16-2 の プロ グラ ム の 行 220 と 行 310 の for 文 の 
終り の 値 100 を いろ いろ 変え て 実行 し て みて 下 
さい 。 


② 到達 回 数 を 柱状 図 (ヒス ト グ ラ ム ) と し て 表示 


する プロ グラ ム を P16-2 に 追加 し て みて 下さ い 。 


105 
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人 @ 放 送 日 1 月 26 日 ( 水 ) 


圏 表 中 の 横 の 計算 


幼稚 園 や 教会 の バザー が 終る と 表 1 の よう な 売 
上 高 や 収益 の 表 を 作る で し ょ う 。 そこ で は 

収益 売上 高 一 経費 
の 計算 を コー ナー ご と に 求め て いま す 。 表 2 は 生 
協 の 共同 購入 の 注文 票 の 一 例 で す 。 そ こ で は 品物 
sa 

金額 数 量 メ 単価 
の 計算 が 行わ れ ま す 。 テキ スト 第 10 回 で は , プロ 
野球 打撃 10 傑 表 で 

打率 三 安打 数 打数 
の 計算 を し まし た (58 真 参照 )。 

今回 は すでに 読み 込ま れ た 表 形 式 の デー タ に 対 
し て 列 同志 の 足し 算 , 引き 算 , 掛け 算 , 割り 算 を 
すき な 列 に つい て 行っ て 結果 を 適当 な 列 に 入れ る 
こと と , 表 の 画面 表示 の で きる プロ グラ ム を 考え 
CA ま > よら う 。 


圏 2 次 元 配列 


複数 の 列 や 行 の ある デー タ を 一 まとめ に し て 記 
憶 し て お くに は 2 次 元 の 配列 を 使い ます 。 これ 
まで に で て きた 配列 は 1 次 元 配列 と も いわ れ ま す 。 
記憶 場所 を タン ス に た と えれ ば , タテ と ヨコ に 引 
き 出 し の 並ん で いる 図 1 の よう な も の を 考え ます 。 
これ に 一 つの 名 前 た と えば 双 と いう 名 前 一 一 
を 付け て 一 つ 一 つの 引出 し 一 一 配列 の 要素 一 一 
は ( 3, 2 ) と いう よう に , 詩 当 の 添字 を 付け て 
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メニ ュー で 選ぶ 
念 再 放送 日 1 月 30 日 (日 ) 


ー つ の プロ グラ ム の 中 で 処理 で きる 仕事 を レス トラ ン の メニ ュー の よう 
に 画面 に 表示 し て , その プロ グラ ム を 使う 人 に 選ん で も らい , 選ば れ た 順 
序 に 仕事 を し て ゆく こと が で きま す 。 メニュー 方 式 と も 呼ぶ 方 法 は 計算 機 
の 対話 型 の 使用 で よく 使わ れ ま す 。 


表 1 バザー の 決算 
ae org 売上 経費 収益 
衣料 品 108.000 円 10,000 円 98,000 円 
食料 品 156,000 円 80,000 円 76,000 円 
雑貨 60.000 円 5,000 円 55,000 円 
花 20.000 円 10.000 円 10,000 円 
ゲー ム 15.000 円 20,000 円 人 5.,000 円 
食 堂 40,000 円 30.000 円 10,000 円 
計 399,000 円 155,000 円 244,000 円 
表 2 注文 票 
章 名 数 量 単 価 金 額 
1 乳 5 190 円 /2 950 円 
だ > まし 2 230 円 / 箱 460 円 
サラ タダ 油 2 280 円 / 本 560 円 
計 ーー 1,970 円 


使い ます 。 配列 で は 普通 は , 横 を 行 , 縦 を 列 と 
いい , 図 2 の よう に 番号 を 付け ます 。 X( 3, 2 ) 
は 第 3 行 。 第 2 列 の 要素 で す 。 図 2 で は 番号 を 1 
か ら 始 め ま し た が , 0 か ら 使 える の が マイ コン で 
は 普通 で す 。 宣言 は mm 文 で , 
dim X(50, 7) 

と ゆう よう もじ ま す う 。 この 弟 書 で 
X(50, 7 ) まで の 要素 が 使え ます 。 


X(0, 0 ) か ら 


較 2 次元 配 列 の 読み 込み 


data 文 に ある デー タ を 2 次 元 配 列 に 読み 込む プ 
ログ ラム を 表示 1 で 見 て 下さ い 。 それ が 標準 の 形 
式 で す 。 寺 下 の プロ グラ ム で は 


図 1 配 例 X の タン ス X 


表示 1 2 次 元 配列 へ の 読み 込み 


DIM X(50,7) 

READ P,N 

FOR A=1 TO N 
FOR 1=1 TO P 
READ X(A,1) 
NEXT 1 

NEXT A 


図 3 添字 の 変数 の 使い 方 


列 数 を P , 列 番号 を I,J,K な どの 変数 
行 数 を N , 行 番号 を A な どの 変数 
で 表し て いま す 。 図 3 を 見 て 下さ い 。 


圏 2 次 元 配列 で の 計算 


表 の 横 の 計算 と し て 列 の 間 の 足し 算 , 引き 算 , 
掛け 算 , 割り 算 の プロ グラ ム は 表示 2 に 示す よう 
に な り ま す 。 それ ぞ れ の 計算 結果 の 例 も いっ し ょ 
に 示し て お きま し た 。 割 り 算 の 例 は ,. パー セン ト 
を 計算 する よう に 割っ た 結果 に 100 を 掛け て あり 
ます 5 例 沈 ば 

X(A, K) =X(A, )/X(A, J)*100 
は , 行 番号 A が 共通 に 使わ れ , 第 A 行 内 で , 1 列 の 要 


第 1 列 第 2 列 第 3 列 
| ep 


第 1 行 | 。 xQi) X (1.2) X (1.3) 
第 2 行 | X(2, 1) X (2,2) X(2,3) 
第 3 行 |  x(3.1) X (3.2) X (3.3) 
第 4 行 |  x(4.1) X (4.2) X (4.3) 
第 5 行 |  X(5.1) X (5,2) X (5.3) 


図 2 配 例 で の 要素 の 添字 


素 を 分 子 に 」 列 の 要素 を 分 母 に し て パー セン ト を 
求め 。 K 列 に 代入 し て いる も の で す 。 こ れ を A に 
つい て 1 から N ま で 実行 する の が 表示 2 の 中 の ④ 
で す 。 


菩 メニ ュー と 仕事 の 振り 分 け 


以上 に 説明 し た 4 と お り の 計算 に 5 番目 の 処理 
と し て 配列 の 表示 を 加え て , その 5 と お り の 処理 
を 自由 な 順序 で 選ん で 処理 を 続け て ゆく プロ グラ 
822036 が まし まう 。 まお 95 人 補記 の 表示 を 
次 の よう に する こと に し ます 。 表示 3 を 見 て 下さ 
い 。 
メニ ュー の 内 容 は お わか り で し ょ う 。 メ ニコ ミー 
を 表示 し た あと , 
4 
と メニ ュー の 中 の 番号 を 選ん で も らい ます 。 そし 
て , その 番号 に よっ て 振り 分 け を 行っ て , プロ グ 
ラム の 必要 な 処理 の 行 へ 飛ば すわ け で す 。 その た 
め に は if-then 文 で , 番号 が m2 に ある と する と 
if m2=1 then 飛び 先 1 
if m2=2then 飛び 先 
if m2=3then 飛び 先 
if m2=4then 飛び 先 
i 導 m2=5 then 飛び 先 5 
と いう 具合 に も で きま す が ,on-goto 文 と いう 便利 
な 文 が 使え ます 。on-goto 文 は 次 の よう に 使い ます 。 
or- goto 文 
・ オ ン ゴ ウト ッ ゥ と 読み ます 。 


シマ スカ ? 


の ) 
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表示 2 2 次 元 配 列 で の ヨコ の 計算 


① 230 REM ーーー タラ サン ーー 
240 FOR A=1 TO N 
250  X(A,K)=X(A。T)+X(A。J) 
260 NEXT A 
日 2 3 {=1.」=2,K=3 の 場合 
1 20 lo) 35 
の 40 25 65 
】 60 20 80 
2 280 REM -ー- ヒキ サン ーーー 
290 FOR A=1 TO N 
300 XX(A,K)=X(A, 1 )-X(A,J) 
310 NEXT A 
韻 1 2 3 1=1, J ニ 2, K 三 3 の 場合 
1 20 1⑤ 9 
2 40 2S 1 
3 60 20 40 
③.330 REM ニーー カケ サン ーー ニー 
340 FOR A=1 TO N 
350  X(A,K)=X(A, 1 )※X(A,J) 
360 NEXT A 
間 1 の 3 1=1,J=2.K=3 の 場合 
1 20 中 CSSS00 
ウ 2 40 25 1000 
3 60 20 1200 
④ 380 REM --ーー ワリ サン -ーー 
320 FOR A=1 TO N 
400  X(A,K)=X(A。 1)/X(A。J)※100 
410 NEXT A 
井 1 2 3 1=2, J=1,K=3 の 場合 
(小数 点 以下 1 位 で 四 捨 
1 20 15 ?5 五 入 し て いま す ) 
2 40 の 5 63 
3 60 20 33 
8 0 彰 
・ 一 般 に ら 飛 び 先 2 へ 、 と いう よう に 変数 の 値 に よっ て 
on 変数 goto 飛び 先 1 , 飛び 先 2 , 右 に 並ん で いる 番号 の 行 へ 飛び ます 。 


の 形 で す 。 
・ 変 数 の 値 が 1 な ら 飛 び 先 1 へ , 
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変数 の 値 が 2 な 


・ 例 図 4 を 見 て 下さ い 。 


ON M2 GOTO 230, 280, 330, 380 


(IF の 8 は トナ プー ザ の | 


1 。。。 レ ツ ( ュ )+ レ ツ ( 」) ニ ニッ > レツ (に ) 
2 。 レツ ( 1) 一 レツ ( 」) ニ ニッ > レツ ( k ) 
3。。。 レ ツ ( 1)※ レ ツ ( 」) ニ ニッ > レツ (に ) 
4 。。。 レ ツ ( 1)/ レ ツ ( 」)※100== ニ > レツ (に ) 
IE 

を か 3 2 


福 1 2 
1 20 9 
2 40 25 
3 60 20 


か PP で = ID 直紀 9 40 し た 9 
1 。。。 レ ツ ( 1)+ レ ツ ( 」)= ニ ニッ > レ ツ ( に ) 
2 。。 。 レ ツ ( 1)ー レ ツ ( 」)= ニ ニッ > レツ (に ) 
3 。。。 レ ツ ( 1 )※ レ ツ ( 」) ニ ニッ > レツ (に ) 
4 。。。 レ ツ ( 1)/ レ ツ ( 」)※100= ニ ニッ > レツ (に ) 
が? ce も ウラ ^ 


NMM 0 ソノ 


較 プ ログ ラム の 説明 
行 番号 

表 に つい て 横 の 計算 を メニ ュー 方 式 で 行う プロ 
グラ ム P17-1( 表 示 4 ) を 説明 し まし ょ う 。 ちょ っ 
と 長い よう で す が , 部 分 的 に 仕事 が 分 か れ て いま 


220 ON M2 GOTO 230, 280, 330, 380 | 


230 = 一 ーー12 = 1 の と き | 
の が | す の で 難しく は あり ませ ん 。 プロ グラ ム の 構成 は 
280 ニーーーー  M2=2 の と き | 次 の よう に な っ て いま す 。 
0 | 行 40-90 基本 と な る デー タ の 2 次元 配列 へ の 読 
に Corewev あ 
四 み 込 み 。 表 の 大 き さ NXP と する 。 
5 。 一 一 =4 の と き | 行 100-160 メニ ュー の 表示 。 
に 00 NE 行 170-180 メニ ュー か ら の 選択 の 入力 と チェ ッ ク 。 
図 4 on-goto 文 の 働き 行 190-220 仕事 の 振り 分 け 。 5 の 処理 な ら す ぐに 
表示 4 プロ グラ ム P17-1 
匠 e 
10 REM P17-1 ヨコ / ノ ケイ サン 
2 で 和 R 民 NE の TSSS デニー 
30 DIM X(50,7) 
40 READ P,N 
50 FOR A=1 TO N 
60 FOR 1=1 TO P | 読み 込み 
70 READ X(A,1) 
80 NEXT I 
20 NEXT A ゴ 
次 買 に つづ く 
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表示 5 (つづ き ) 


抽 20 EMI AE に Ne の 
00RRIENII メニ ば ーッ E コ IO ラル の で サコ 
120 PRINT "1。。。 レ ツ ( 1 エ )+ レ ツ ( 」)= ニ => レ ツ 〈( に ) “ 
130.PRINT 2。。 レツ ( 1) レツ ( 」)= ニ = ッ > レツ (k) 
140 PRINT 『 人 7 
150 PRINT "4。。。 レ ツ (1)/ レ ツ ( 」)x100==> レ ツ (k ) " 
160 PRINT 『 うつ ・・・ ヒ ョ ウシ " 
170 INPUT "ナニ ヲ ラマ スカ '』M2 
180 IF M2<0 OR _M2>5 THEN BEEP:GOTO 170 


| 190 IF M2=5 THEN 430 
200 INPUT" ュ jk" 51。J,K 

210 IF K>P THEN P=K 

220 ON M2 GOTO 230,280, 330 , 380 

230 REM --- タラ サン ーーー 

240 FOR A=1 TO N 

250  X(A,K)=X(A, 1)+X(A,。J) 

260 NEXT A 

270 GOTO 100 

280 REM --- ヒキ サン ーーー 

290 FOR A=1 TO N 

300  X(A,K)=X(A, 1 )-X(A,。J) 

310 NEXT A 

ー320 GOTO 100 

330 REM --- カケ サン ーーー 2E3 

340 FOR A=1 TO N 

350  X(A,K)=X(A, 1 )xX(A,J) 

360 NEXT A 

ー370 GOTO 100 

380 REM --- 9 リサ " ン ーーー < 4 

320 FOR A=1 TO N 

400  X(A,K)=X(A, 1)/X(A,。J)*100 


410 NEXT A 
=-420 GOTO 100 

430 REM --- ヒョウ シ " -ーー < 2 きす 

440 PRINT' #': 

450 FOR 1=1 TO P ] 

460 PRINT USING " 村 村 梓 拉 培 " ? 1s [一 表 の 上 の 見 出し 

470 NEXT 1 」 

480 PRINT:PRINT "一 ": 

490 FOR 1I=1 TO P に 

500 PRINT " e ケイ 株 

510 NEXT 1 3 

520 PRINT 

530 FOR A=1 TO N の 

540 PRINT USING "3As | 家 の 中 身 


550 FOR 1I=1 TO P 
560 PRINT USING" 拉 提 提 培土" 3XCA,T)3 
S?70 NEXT I 

580 PRINT 

590 NEXT A 

し 600 GOTO 100 

610 REM --- テー タ ーーー 
620 DATA 2,3 

630 DATA 20,15 

640 DATA 40,25 

650 DATA 60,20 

660 END 
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行 430 へ 。1 一 4 の 処理 の と き , 列 の 番号 1, }, 
k を 入力 させ て か ら on-goto 文 で 分 か れる 。 
行 230-270 足し 算 の 処理 。 処 理 後 行 100 へ 戻る 。 
行 280-320 引き 算 の 処理 。 7/ 
行 330-370 掛け 算 の 処理 。 / 
行 380-420 割り 算 の 処理 。 / 
行 430-600 表 の 画面 へ の 表示 。 処 理 後 行 100 へ 戻る 。 
行 610-650 デー タ の 例 。P と N の 値 ,X(1.1),X(1. 2 ), 
X(2, 1). ….X(3, 2) の 順に 与え る 。 こ の 順 
は 行 40 一 90 の 読み 順に 対応 させ る 。 
この プロ グラ ム で は , 2 次 元 配列 の 使い 方 と on- 
goto 文 が ポイ ント で す 。on-goto 文 で 飛ん だ 先 で は 
処理 が 終る と 常に 行 100 へ 戻っ て き て いる こと に 注 
意 し て で 下さい 。 したがって, メニ ュー の 番号 を 適 
当 に 選ぶ こと に よっ て , 好き な 組み 合わ せ の 順に 
処理 を 続け る こと が で きま す 。 
な お 。 行 180 の 中 -then 文 は 
IF M2<0 OR M2>5 THEN BEEP:GOTO 170 
と な っ て いま す 。 こ こ で の OR は また は と い 
う 意 味 で す 。 こ の rf-then 文 は 条件 M2 く 0 が 成り 立 


表示 5 P17-1 の 実行 例 


つか , また は . 条件 M2>5 が 成り 立つ な ら ( つ まり 
M2 が 1,2,3,4,5 の 男 囲 で な いな ら ), BEEP 
し て ( プ ザ ー を 鳴ら し て ), 行 170 へ 戻れ と いう こ 
と で す 。 この OR の 使い 方 は 便利 で すか ら だ ん 


だ ん に 慣れ て 下さ い 。 
圏 実行 の 例 
メニ ュー か ら 5.1.5.2.5.3.5.4. 5 の 順に 選ん で 


実行 し た 例 を 表示 5 に 示し ます 。 途中 毎回 の メニ 
ュー の 表示 は 省略 し て あり ます 。 


較 プ ログ ラム の 改良 


メニ ュ を も う 一 つ ふ や し て , 配列 X の 第 0 列 
の すべ て の 要素 ( X(1.0), X(2,0),…, X( N ,0) ) 
に 任意 の 数 値 を 入れ られ る よう に する と , プロ グ 
ラム の 応用 範囲 が ずっ と 広く な り ま す 。 その プロ 
グラ ム P17-2 は 付録 に あり ます の で 参考 に し て 下 
さい 。 たとえば, 二 つ の 列 の 要素 ご と の 和 を 2 で 
割っ て 平均 を 求め る こと な ども 人 容易 で す 。 


以 届 ビョウ ノ ヨコ 2 サイ サン 
1 。 。 レツ ( 1)+ レ ツ ( 」)= ニ ニッ レツ ( k ) 
2 . 。 、 レ ツ ( 1 ) 一 レツ ( 」 )= ニ ニッ レツ ( k ) 
3 .  , レ ツ ( 1 )※ レ ツ ( 」)= ニ ニッ > レツ (に ) 


3 放 ) 寺 4- 2 ルン 2 
アン ラマ スカ ? (⑤) 一 一 表示 
村 


1 2 
1 20 15 
演 Ro 間 る 
3 6 20 


ナニ ラ ラマ スカ ? 
1 jyk7 1。2。 
ナニ う ラマ スカ 7 ⑤ 
村 1 の 


足し 算 


1 20 蘭 陸 誠に 
の っ 床 メー 
さ 3 @0 20 80 


次 軸 に つづ く 


4 . . . レ ツ ( 1 )/ レ ツ ( 」)※100== ニ > レツ (に ) 


レツ (1) キ レツ (2) ユ レ ツ (3) 
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表示 5 (つづ き ) 


ナニ ヲ シマ スカ ? (②) リ ーー 引き 算 
を は の まま ッ グ ん 
ジオ 

本 1 2 3 4 


3 間 い ま の 5 
2 電 生 25 6 き 
全 SW 20 80 40 
ナニ ラ シマ スカ ? (③) 一 一 一 掛け 算 
の 
ナニ ヲ > マ スカ ? 5 
六 1 2 3 4 5 


3 1 5 300 
9 25 8 15 3900 
6 2 : 参 40 1200 
ナニ ラ シマ スカ ? (④ーーー 逢 算 ( 守 の 計算 ) 
9 2 
ナニ ヲ シマ スカ ? 5 
由 1 2 3 4 に 6 


1 20 は ら 地 線 c 1 いい 《9 
2 40 か 15 1000 63 
| トド 20 80 40 1200 33 


2 次 元 配 列 と し て の 表 の 計算 を メニ ュー 方 式 で (《② メニ ュー 方 式 は マイ コン と の 対話 型 の プロ グ 


や っ て み ま し た 。 ラム を 作る の に 大 変 便利 で す 。 
① 2 次 元 配列 に 慣れ る と 表 形 式 の デー タ を うま ③ on-goto 文 で 仕事 の 振り 分 け を 行う こと が で き 
さ 扱 うこ と が で きま : す 。 まず 。 
ゃ っ て みよ う 
こさ ニラ 4! * 
りな X 三 ュ と て X を 求め 、 5 な ら た だ 実行 を 終る プロ グラ ム を 
1: メニ A 士 B 2: メー ニ A 一 B 作っ て みて 下さ い 。 
8 は 326 三 六 'B. を: 多 三 ググ B 〈⑧② テキ スト 第 10 回 の プロ 野球 セン リー グ 成 績 ( 表 
5% ウ 4.54 具 ) の 試合 数 , 勝 ち 数 , 負け 数 , を デー タ と 
と 表示 し ,。 1 か ら 4 で し て 引き 分 け の 数 , 勝率 , を プロ グラ ム P17-2 で 
大 6Bー ツ 7 求め て みて 下さ い 。 


と 表示 し て , A と B の 二 つ の 数 を 入力 させ て , 
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信 放 送 日 2 月 2 日 ( 水 ) 


どり あげ まし ょ う 。 


マイ コン ゲー ム も 悪く あり ませ ん が , 
し む の も よい も の で す 。 今回 は 家族 ゲー ム の 記録 を 集計 する プロ グラ ム を 
1 ゲー ム 析 二 二 を に だ ん だ ん と キタ を キー ボー ドド が 
ら 入 力 し て ゆく 場合 に は , 間違っ て 入力 し た デー タ を あと か ら で も 修正 で 
きる こと が 必要 で す 。 こ の 種 の プロ グラ ム は 多く の 場面 に 活用 で きま す 。 


ゲー ム の 記 緑 


人 @ 再 放送 日 2 月 6 日 (日 ) 


昔 か ら の トラ ンプ な ど を 家族 で 楽 


較 何 を し た いか 


土曜 日 曜 の 晩 に は 家族 で ゲー ム を 楽し む 家 庭 も 
多い で し ょ う 。 表 示 1 は ゲー ム 好 き の 家 族 が トラ 
ンプ の 7 並べ を 10 回 や っ た と き の 記 録 を マイ コン 
で 表示 し た も の で す 。 各 回 の 数 字 は 1 回 ご と の ゲ 
ー ム で の 順位 で す 。 その 日 の 合計 は "ケイ ” の 行 
に あり ます 。 そ の 下 の 2 行 は "セン カイ ” と い 
う 見 出し の 行 が 前 回 まで の 合計 記録 で 、 そ の 下 が 
その 晩 の 分 を 加え た 累積 の 記録 で す 。 横 の 見 出し 
欄 に 80 と ある の は , その 晩 の 10 回 を 加え て これ ま 
で 80 回 の ゲー ム を や っ た こと を 示し て いま す 。 


こん な 記録 が 残っ て ゆく と 楽し いで すね 。 長い 
こと 記録 を と っ て いる と マイ コン の 良い プロ グラ 
ム が ほし く な り ま す 。 家族 か らい ろ い ろ な 注文 が 
よう 。 

ここ で は , 次 の よう な 要求 | に 答え る プロ グラ 
ム を 紹介 し まし ょ う 。 
① ゲ ー ム 中 に いつ で も , その 日 の 経過 と 合計 が 見 
7 な Mc 
デー タ の 間違い に 気付 いた ら 修正 で きる よう に 
し た い 。 
ゲー ム 終 了 後 , 前 回 まで の 累積 記録 を 加え て 新 
し い 合計 を 出し た い 。 


折 - 


表示 1 
ゲー ム の 記録 


オォ ヤシ" オフ クロ NNNN HHHH KKKK 
1 カイ が) 密 4 1 に ) 
2 カイ に ) m, 1 2 4 
づ カ イ ) 1 4 間 RM 
4 カイ 2 4 ) 1 3 
5 カイ 4 3 ご) 1 2 
6 カイ 1 4 2 さ っ 
カイ er き 3 1 4 
8 カイ う の 3 1 4 5 
9 カイ う e。 1 2 4 
10 カ イ う 5 1 4 2 
か イ 34 34 人 ーー 
セ " ン カイ 201 233 204 204 208 
900. 235 267 22 の 9 226 243 
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(〈④ ゲ ー ム に 参加 する 人 が 変わ っ て も 使え る よう に 
し た い 。 

この ほか に も 日 付 や 時 間 を 記入 で きる よう に し 
た いな どい ろ い ろ な 要求 が ある で し ょ う が , ここ 
で は プロ グラ ム を あま り 複 雑 に し な いよ うに この 
呈 度 に し て お きま し た 。 プ ログ ラム を 作る と き に 
は , それ を 使う 人 が 何 を し た い の か , 何 を 要求 し 
て いる か を よく 話し 合っ て 考え て お く こ と が 大 切 
な の で す 。 


較 プ ログ ラム の 実行 結果 


プロ グラ ム の 実行 結果 を 見 れ ば , その 使い 方 や 
どの よう な 処理 が 行わ れ て いる か わか っ て くる で 
し ょ う 。 表 示 2 と 3 に 分 け て 実行 結果 の 画面 の 移 
り 変 わり を 見 て ゆき まし ょ う 。 

実行 (run) を は じ め る と , まず 参加 者 の 登録 を 
行い ます 。 


サン カシ ャ ノ トウ ロク (サイ コ ゞ RETURN) 
と 印字 され て 

ナチ マエ? 
と きい て きま す 。 そ こ で 参加 者 の 名 前 を 入力 し ま 
す 。 画 面 の 大 き さ の 都合 で 4 文字 まで に し て お く 
と よい で し ょ う 。 こ れ を 繰り 返し て 参加 者 が (6 
人 より ) 少な いと き は [RETURN] キー を 押す と 登 
録 を 終り ます 。 
次 に 。 メニ ュー が 印 宇 さ れ ま す 。 


1( 入 力 ) 2 (表示 ) 3 (修正 ) 4( 終 り の 処理 ) 
と いう 意味 で す 。 そ こ で 
Ro 


と 答え る と 1 ゲー ム 終 了 時 の 結果 を 入力 する こと 

が で きま す 。 メニ ュー の 2,。 3。 4 は あと で 出 て 

きま す 。 メニ ュー の 1 を 選ん だ と き は 
3 2 

の よう に 参加 者 の 名 前 を 印字 し て 入力 を 要 


表示 2 
、 実 行 例 


3( シュウ セイ ) 
を 


3( シュウ セイ ) 
8 
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サン カシ ャ ノ トウ ロク ( サイコ" RETURN ) 


(ニュ リウ リョク) ので ヒョウ タラ") 
4( オ リリ 


4( オ リリ 


カイ オォ ヤシ" オフ クロ NNNN HHHH KKKK 


| 


ーー | RETURN | キー だ け を 押す 


ノ ショ リ ) 


プ うき り 9 


(さり ョ グ ク ナ 2 て ビュ ョ リラ“) 
3( シ ュ 9 セ イ ) 4( オ ワリ / ショ リ ) 
< 


カイ オヤ ラー 


1 ( ニュ ウリ ョ ク ) 2( ヒ ョ ウシ “ ) 


3( シュ 9 セイ ) 4( オ ワリ ノ ラ ョ リ ) 
っ 

ナン カイ メ ? 6 

ナン ルッ ) バ E あ て S 

ゲス ンプ 


さ ( シュ サウ セイ う 
8 ディ 


4( オ ワリ ノ ショ リ ) 


カイ オォ ヤシ“ 


ォ フ クロ NNNN HHHH KKKK 


表示 3 
実行 例 (途中 ) 修正 の 例 


ォ フ クロ NNNN HHHH KKKK 


ラジ 


求 し て きま す 。 そ こ で 成 積 を 入力 する と , 次 の 参 
加 者 に つい て 入力 を 要求 し . これ を 参加 者 分 に つ 
いて 実行 し ます 。 こ の 成績 の 入力 を 終了 する と , 
再び メニ ュー が 印字 され ます 。 

次 に 表示 3 を 見 て 下さ い 。6 回 目 の 入 力 を 終っ て , 
メニ ュー の 2 を 選ん だ と ころ で す 。 す ぐに 集計 表 
が 印字 され て きま す 。 も と の デー タ が 順位 で すか 
ら HHHH 君 が リー ド し て いる こと が わか り ま す 
ね 。 そ この 6 回 目 の デ ー タ に は 3 位 が 二 つ あ り , 


デー タ の 入力 に あや まり が あっ た よう で す 。 そ こ 
CE かー の 33 を 選 の 5 ます 。、 する で) 
ルン ンク と 。 人 4 
NE ニン メグ 
の 2202 テス 
と 順に きい て きま す 。 そこ で は , 6 回 目 の 3 番 の 
人 (NNNN 君 ) の 値 ( 3 ) を 2 に 修正 し て いる わけ 
29 ニー の 更 択 で 7 と 答え た り ず る と, 
の ES が V0 の で (ビー と な っ つ て) まだ た が が 印 


選民 層 
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表示 4 
実行 例 (終り の 処理 ) 


1 ( ニュ ウリ ョ ク ) 2( ヒ ョ ウシ * ) 
3( シュウ セイ ) 4( オ ワリ / ショ リ ) 
の ディ 


カイ オォ ヤシ" オフ クロ NNNN HHHH KKKK 


1 カイ う の 4 1 に 」 
2 カイ う う 1 2 4 
づ カ イ う 1 4 有 あ に 
4 カイ 2 4 っ I う 
つ カ イ 1 う 1 1 2 
6 カイ 1 4 1 に つ 
カイ 1 に ) 1 の 4 4 
8 カイ 3 2 1 4 ) 
カイ 3 つ 1 2 4 
10 カ イ き 上 4 2 


ケイ 34 34 の 22 35 


1 (ニュ ウリ ョ ク ) 2( ヒ ョ ウシ * ) 

3③( シ ュ ウ セイ ) 4( オ ワリ / ショ リ ) 

2 

セ ” ンカ イ マチ " / ノ キロ ク ラ イル マス カ ( ッ ノ n)?7 ッ 
カイ ? 70 

オヤ 2260 注 

ォ フ クロ ? 233 

NNNN? 204 

HHHH? 204 

KKKK? 208 


カイ ォ ヤ シ " オフ クロ NNNN HHHH KKKK 
1 が KR 
1 カイ 2 
2 カイ 
づ カ イ 
4 カイ 
つ カ イ 
6 カイ 
7 カイ 
8 カイ 
カイ 
10 カ イ 


の OO の ロビ いい ロ の ロロ 
ID の 尽 の 玉 は 品 

ば は 選 ビビ ビ DD ロ ロロ は は 
尽 い D 尽 D り の OR 選 DND は は 
いり 選 ロ だ 品 DO の OR の 


か イ 34 34 25 22 35 
も ンカ ガイ 203 233 20 204 208 
BdO 235 26 ア の 2e6 、 ラ 43 
1 ( ニュ ウリ ョ ク ) 2( ヒ ョ ウシ * ) 
づ ( シュ ウ セ イ ) 4( オ 9 リ / ショ リ ) 
2 


字 さ れ , メニ ュー か ら の 選択 を きい て きま す 。) 
さて , 10 回 目 ま で すん で 終り に し た いと き は メ 
ニュ ー の 4 を 選び ます 。 表示 4 を 見 て 下さ い 。 
光 力作 2 寺下 ク アイ レイ マズ が WO 
と きい て きま す 。 前 回 まで の 合計 を 入力 する な ら 
y,。 そう で な けれ ば n と 入力 し ます 。 イエ ス (YeS) 
か ノー(no) か と いう 意味 で す 。 y と 答え る と , 
2905 ? 
と きい て くる の は , これ まで の ゲー ム 回 数 , 以下 
は 参加 者 ご と の 記録 を きい て きま す の で 入力 し て 
ゆき ます 。 


一 処理 の 概略 


実行 結果 が だ いた い 想 像 で きた と 思い ます が , 
この プロ グラ ム の 処理 手順 の 概略 を まとめ て お き 
まゆ 、 よ "9 
ゲー ム 記 録 処 理 手順 の 概略 
@ 参 加 者 の 登録 を 行う 
@ 以 下 を 反復 する 。 

@ メ ニュ ー を 表示 する 。 

1( 入 力 ) 2( 表 示 ) 3( 修 正 ) 4( 終 り の 処理 ) 
@ メ ニュ ー か ら 番 号 を 選ん で 入力 する 。 

選 k の どき 

1 回 ご と の ゲー ム の 成績 を 入力 する 。 
2 の と き , 
| そこ まで の 集計 表 を 表示 する 。 

ト 3 の と き , 
デー タタ の 修正 を 一 つ ず つ 行 う 。 
-4 の と き 。, 
終り の 処理 と し て , 必要 な ら , 前 回 まで 
の 累積 記録 を 加え て , 総合 の 表 を 作る 。 


圏 プ ログ ラム の 主要 部 の 説明 


ゲー ム 集 計 の プロ グラ ム P18-1 を 表示 5 に 示し て 
お きま す 。 プ ログ ラム は や や 長い の で す が , メニ 
ュー 方 式 の プロ グラ ム は プロ グラ ム の 構成 が は っ 
きり し て いる の で 難し いこ と は あり ませ ん 。 


プロ グラ ム の 主要 部 を 抜き 出し て 説明 し て お き 


まま 9 江 
行 40-80 参加 者 の 登録 を 行う 。 行 60 の input 文 で 


RETURNI キ ー だ けが 押さ れる と , A$ 
⑪ に は 空 の 文字 列 " "が 入り , つぎ の 
-then 文 の 判定 で そこ の for 文 が 行 90 へ 脱 
出し ます 。 

行 110-160 メニ ュー の 表示 と 振り 分 け 。 行 150 の 
if-then 文 の OR は “また は " と 読め ば わか 
SG) 

行 230-260 行 240 と 250 は gosub 文 が あり ます 。 
あと で 説明 し ます が , 表 の 印字 を する サ 
プ ブルー チン と (最後 の ) け い 線 を 引く サ 
プ ブルー チン へ 飛び , 仕事 を し て か ら 次 の 
行 へ 戻っ て きま す 。 

行 270-310 デー タ の 修正 。 

行 320-520 終り の 処理 。 配 列 Z は 前 回 まで の 慣 積 
を 入力 し , 配列 S は 合計 を 求め る た め の 
配列 で す 。 

行 530-570 1 本 の けい 線 を 必要 な 長 さ だ け 引 く 仕 
事 を し ます 。 行 570 が RETURN 文 と な 
っ て いる こと に 注意 し て 下さ い 。 サ ブル 
ホン Un49 和 ます 5 

行 580-800 表 の 画面 表示 。 行 800 に RETURN 文 
が あり , サブ ルー チン に な っ て いま す 。 


圏 サ プル ー チ ン ( 副 譜 ) 


プロ グラ ム の いろ いろ な 場所 で 何 回 も 利用 され 
る よう な 一 つの まとまっ た 仕事 は これ を サ プ ル ー 
チン (sub routine) と し て 別 の と ころ の 書き , 主 ル 
ー チ ン (main routine) で は , これ を 

GOSUB 行 番号 
で 実行 させ る こと が で きま す 。 こ れ を 使う と プロ 
グラ ム が 見 や すく な り , また , 同じ 仕事 を 重複 し 
て 書き 下す 必要 が な く な り ま す 。 

行 580 か ら 800 は 表 を 作る サブ ルー チン に な っ て 
いま す が , これ は , 主 ル ー チ ン の 行 240 と 行 390 で 
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表示 5 プロ グラ ム P18-1 


10 REM P18-1 ケ "ー ム / ノ シュ ウケ イ 


20 DIM A*$(6),X(200,6) ,S(6) ,Z(6) 

30 REM ーーー サン カシ ャ ノ トウ ロク ーーー 

40 PRINT "サン カシ ャ / ノ トウ ロク (サイ コ * RETURN ) " 

っ 0 FOR 1T=1 TO 6 

60 INPUT "ナマ エ " :A ま (1 ) 

70 IF A ま (1)="" THEN 90 

80 NEXT 1 

290 P=[-1 :A ま (0 )=" カ イ 5 ャ ーーーー P は 参加 者 数 A$ は 上 の 見 出し に 使う 
100 B=0 < B は ゲー ム の 回 数 の カウ ンタ 

110 REM ーー メニ ュー ーー 

120 PRINT "1( ニ ュ 9 ウ リョ ク ) 2( ヒ ョ ウシ * ) " 

130 PRINT "3( シ ュ ウ セイ) 4( オ 9 リ / ショ リ ) 

140 INPUT J 

150 IF J<1 OR J>4 THEN BEEP:GOTO 140. ー-J ぐ 1 また は J>4 な ら エ ラー 
160 ON J GOTO 170,230, 270 , 320 

1 70 REM 一 - ニュ ウリ ョ ク ーー 一 

180 B=B+1 

190 FOR 1=1 TO P 参加 者 ご と の 成績 を 入力 

200 PRINT A ま (1)::TINPUT X(B, 1 ) 

210 NEXT 1I 

220 GOTO 110 

230 REM ーー ヒョウ シ " ーーー 

240 GOSUB 580 表 作 成 の サ プ ブル 
250 GOSUB 530 h けい 線 ? W 
260 GOTO 110 

270 REM --- シュ ウ 9 セイ ーーー 

280 PRINT "ナン カイ メ " 』 iTINPUT A 

290 PRINT "ナン ハル" ン ノ ヒト "ji:INPUT 1I 

300 PRINT "イク ツ ニ " jiTINPUT X(A,1 ) 

310 GOTO 110 

320 REM --- オウ リ / ショ リ -ーー 

330 PRINT "も セ " ン カイ マテ " / キロ ク ヲ ラ イル マス カ "': 
340 INPUT " (y/n ) ” : A ま 

350 IF A ま ="n" THEN 520 

360 FOR 1I=0 TO P 一 前 回 まで の 成績 を 入力 する 
370 PRINT ゐ A ま も (1 ):: INPUT 7Z(1) 

380 NEXT 1I 

320 GOSUB 580 

400 S(0)=B 

410 FOR 1I=0 TO P 

420  S(1)=S( 1 )+Z( 1 ) 4 新しい 合計 を 求め る 

430 NEXT Ii 

440 PRINT "も セ " ン カイ “" 』 

450 FOR 1=1 TO P 前 回 まで の 成績 を 印字 

460 PRINT USING "本 提 音 井 寺 " ょ ア ( 1 ): | 

470 NEXT 1IzPRINT 

480 FOR 1I=0O TO P 

490 PRINT USING " 村 提 韻 提 杜 "SG(T)? 新しい 合計 (総合 の 成績 ) を 印字 
500 NEXT 1IzPRINT 

510 GOSUB 530 5 けい 線 を 引く サブ ルー チン へ 
520 GOTO 110 

530 REM ニニ = ケイ セン = ニニ = 
540 FOR 1I=0O TO P 

550 PRINT の 8 
560 NEXT IiPRINT" 一" 
570 RETURN 


次 軸 に つづ く 
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(つづ き ) 


REM 

FOR 1=0 
PRINT " 1 

NEXT Ii:PRINT "一" 1 

PRINT " 「'』 

FOR 1=0 TOP 
PRINT USING'& 
S( 1 )=0 

NEXT Ii:PRINT 和 

GOSUB 530 

FOR A=1 TOB 
PRINT USING"# 革 "jiPRINT 『 カ イ 
FOR 1=1 TO P 

PRINT USING " 匠 匠 竹 "3XCAz1): 
S(1)=S(I)+X(A。1) 。 
NEXT 1I:PRINT 

NEXT A 

GOSUB 530 ーー キュ ーー テー オー 

PRINT "ケイ | 

FOR 1=1 TO P 
PRINT USING" 匠 革 " 3S(I)5 

NEXT IiPRINT | 

RETURN 


&' iA ま (1)5 


790 
800 


表 の 士 の サ い 線 を 引く 


の 上 の 見 出 じ と じ し て 名 前 を 印字 する 


合計 欄 を 印字 する 


を 求め る 配列 S を ゼロ に する 


表 の 内 容 を 印字 する 


2 横 の 見 出し 


- 合 計 を 求め る 


ーー ーー けい 線 を 9 く 


の gosub 580 で 使わ れ て いま す 。 この サブ ルー チン 
は 表 の ケイ 線 を 引く た め に , 行 670 と 行 750 で 行 530 
か ら 570 の サブ ルー チン を 使っ て いま す 。 

サ プ ブルー チン で は , 主 ル ー チ ン に 戻る た め に 

RETURN 

と いう 命令 を 使い ます 。 プ ログ ラム P18-1 で は 行 
570 と 行 800 に return 文 が あり ます 。 
goSub 文 
・ ゴ ウサ プ ブ と 読み ます 。 


re 


前 回 は 表 の 横 の 計算 を 取り 扱い まし た が , 今回 
は 表 の 縦 の 計算 を 行っ て いま す 。 
① キー ボー ド か ら デ ー タ を だ ん だ ん と 入力 し て 
表 を 作っ て ゆく と き は , デー タ を 修正 で きる 機 
能 が 大 切 で す 。 


・ 一 般 に 
GOSUB 飛び 先 

の 形 で 使い ます 。 

ズー チン べ 飛 ん で さぞ で の サブ プ ル デー チ シ の 
return 文 で 。 戻っ て きま す 。 

return 文 

5 の 多 テ ジン を 読み ます -。 

・ サ ブル ー チ ン に は return 文 が 必ず 1 か 所 は 必要 
269'。 


P 


② サブ ルー チン を 使う と , プロ グラ ム が 見 や す 
く な り ま す 。 プ ログ ラム は 部 分 的 な 仕事 を ひと 
まとめ に し て , 一 つの 部 分 は あま り 長 く な ら な 
いよ うに 作り ます 。 


ーー 


① プロ グラ ム P18-1 の 行 530 一 800 の サブ ルー チ 
ン を 第 10 回 の プロ グラ ム P10-5 と 比較 し て 見 て 
下さ い 。 プ ログラム P18-1 で は けい 線 や 見 出し 


の 印 演 の 長 さ を P に よっ て 変え て いる こと に 注 
意 し て 下さ い 。 
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暗号 文 を 作ろ う 


念 放 送 日 2 月 9 日 ( 水 ) 


いて , “暗号 の か ぎ " 


念 再 放送 日 2 月 13 日 (日 ) 


マイ コン の 仲間 に 暗号 文 を 送っ て 解読 し て も ら っ て は どう で し ょ う 。 こ 
こ で は , や さ し い シー ザー 式 や 転 置 式 と いわ れる 暗号 の 作り 方 を プロ グラ 
ム に し て み ま す 。 こ の 種 の プロ グラ ム に は 文字 列 の 基本 的 処理 が 含ま れ て 
な ら ぬ 文字 処理 の キー に な る で し ょ う 。 


圏 換 え 字 式 

暗号 は , 知ら せ た い 人 に は 内 容 が わか り , 知ら 
れ た く な い 人 に は わか ら な いよ うに 工夫 し た も の 
で す 。 エド ガー・ ア ラン ・ ポ ー の 「 黄 金 虫 」 に は , 

5311 和 †305) )6": 4826…… 

と いう 200 字 あま り の 暗号 を 解読 する くだ り が あ 
り ま す 。 こ れ は アル ファ ベッ ト を 数 字 や 記号 に 置 
き 換 えた も の で , 数 字 記 号 ご と の 出現 する 頻度 を 
考え て 見 事 に 解 か れ て ゆき ます 。 英語 で は e が も 
っ と も 多く 使わ れる こと は よく 知ら れ て いま す 。 
暗号 を 作る こと を 考え る と , この よう に , 文字 
を 一 つ 一 つ 別 の 文字 や 記号 ある い は 数 字 に 変換 す 
る の が いち ば ん 簡単 で し ょ う 。 こ の よう な 方 式 を 
換え 宇 式 と いい ます 。 換え 字 式 で 暗号 を 作る に 
は 変換 表 を 用 意 し て 一 字 ず つ 置 き 換 えて ゆき ます 。 
ボー の 「 黄 金 虫 」 の 解読 結果 か ら 変 換 表 を 作っ て み 


表 1 変換 表 ! (ポー の 暗号 で 使わ れ て いる 英字 に つい て ) 


る と 表 1 の よう に な り ま し た 。 原本 で 使わ れ て い 
る 風変わり な 記号 は , マイ コン で 扱え る よう に 変え 
て いま す の で 注意 し て 下さ い 。 私 が マイ コン で 遊 
ん で みた と き の 「 黄 金 虫 」 の 暗号 と , 解読 され た 英 
語文 を 章 末 に の せ て お きま す 。 そこ で は , 英語 の 
文章 と し て 読み に くい で し ょ う が , 暗号 と 対応 す 
る まう だ 7 当 伯 ドア ポス トロ フイ (5 ペイ ラジ 
(-), ピリ オド (.) を 省略 し て あり ます 。 


較 シ ー ザ ー 式 


中 学 1 年 の A 君 は マイ コン 仲間 の B 君 か ら 
「 ス リ ニ ツ 。 シ エ ヒ リモ セア エ ュ 
と 書い た 手紙 を も らい まし た 。 A 君 は さっ そく マ 
イコ ン を 使っ て 解き は じ め ま し た 。 さ て , どう い 
う 意 味 に な っ た で し ょ う 。 

と ころ で 。 換え 字 式 の 中 で も 、 シー ザー 式 と い 
われ る 方 法 が よく 知ら れ て いま す 。 カナ だ け の 文 
を 例 に 説明 し て お きま し ょ う 。 例 えば, カナ を イ 
ロ ハ 順 に 並べ て 。 も と の 文 の 1 字 ず つ を , 一 定数 
だ けず らし た 文字 に 換え る の で す 。 その 一 定数 を 
2 と すれ ば , イロ ハ 順 は イロ ハニ ホ へ ヘ へ ト と 並び ま 
すか ら , イ を ハ , ロロ を ニ ,。 ハ を ホ に と いう 具合 に 変 
換 し ます 。 終り の 方 の セ , ス , ン は それ ぞ れ ン , イ , 
ロ と も と に 巡っ て 変換 し ます 。 念 の た め に いろ は 
歌 を 示し て お きま し ょ う 。 


† 原本 の 記号 で マイ コン の キー ボー ド に な いも の は 適当 に 変え て あり ます 。 
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色 は に ほ へ ど 散り ぬる を 
わが 世 た れ ぞ 常 な らむ 
う あ の 失 員 け ふ 動 え て 
浅 き 夢見 し 篤 ひ も せ ず 
英文 や ロー マ 字 文 な ら ABC 順 の アル ファ ベッ ト 
を 使え ば よい で し ょ う 。 


圏 プ ログ ラム を 作ろ う 


シー ザー 式 暗号 は , ずら す 数 一 一 こう いっ た 情 


報 を 』 暗 募 の カギ と いい ます 一 一 を 知っ て いれ ば ぱ ば , 


作る の も , 解く の も 簡単 で す 。 た だ , 普通 の 文章 に 
は ガ や ダ の 油 点 (^ ) や パ の よう な 半 滴 点 ( ) が あっ 
た り , 小文字 が あっ た り し ます 。 いろ は 歌 に は , 現 
在 で は 使わ れ な く な っ て いる 古い 吐 ( ゐ ) と 也 ( 多 
が 入っ て いま す 。 こ の 2 字 は キー ボー ド に も あり 
ませ ん 。 そ こ で ,「 吐 と を 除く 46 文 字 だ け を 使う 
こと を 原則 に , も と の 文 で は 小文字 は 使わ な いで 
"( 半 濁 点 ) は 
も と の 文 に あっ て も よい が , 暗号 に 変え る と き は 
無視 し て つめ て し まう こと に し ます 。 意 は 滴 吉 や 
半 濁 点 を 無視 し た 書き 方 が あり まし た 。 


も らい , その ほか の 空白 ,~ ( 沿 点 ), 


表示 1 プロ グラ ム P19-1 


この 考え で 作っ た プロ グラ ぬ P19-1 を 見 て 下 ぎ 
い ( 表 示 1 )。 P19-1 の 変数 の 使い 方 を まず まとめ ・ 
で お 寺 まま 選 お ボ くう 
KS イロ ハ 順 の 46 文 字 を 並べ た 文字 列 
AS 入力 する 文 (暗号 の ほう で も よい 。) 
折 カギ の 数 (ずら し の 数 ) 
(し が マイ ナス な ら 左 へ ずら す 。) 
L$ イロ ハ 順 を 巡回 式 に 上 だ けず らし た 文字 
列 を 覚え て お く ( 図 1 を 見 て 下さ い ) 
BS 入力 され た AS を 変換 し た も の を この BS 


に 作る 


L テ ー2 の と き 


(L=46 一 2=44 の と き と 同 じ に な る ) 


図 1 L し に よる K$ と LS の 関係 


2 


BA 民 世 MNO ギ 第 アジ 2 の C9 

20 K ま = "イロ 人 ル ハニ こま へ ト " 二 "チリ ヌル ラ 
30 K=K ま + "9 カヨ タレ ソ ” + "ツネ ナラ ム 「 
40 K=K+ "ウノ オグ ク ヤマ” + "サフ ゴ エ テ " 
50 K=K+ " アサ キ ユ メ ミ シ " + " ヒモ セス ン 
60 INPUT "カナ ノ フン "5 人 A ま 

70 INPUT "カキ " "5L 

80 IF L<0 THEN し L=46+L 


110 B*="" 
120 FOR 1=1 TO LEN(A ま ) 


150 NEXT I 
160 PRINT TAB(8)5?B ま 
170 GOTO 70 


20 IF L<0O OR L>46 THEN BEEPiGOTO 70 
100 L ま =RIGHT ま も (K ま 46 上 )+LEFT 和 ま (K ま 。L ) 


130  J=INSTR(K ま ,MID ま (AT 1 ) ) 
140 IF J>0 THEN B ま =B ま +MID ま (し ま ,J,1 ) 
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表示 2 プロ グラ ム P19-1 の 実行 例 表示 3 暗号 の 解読 


Fun 
244 ルド Er 
の まい 7 クウ 


と 4 2 キュ の スプ 


ベリ ニワ リラ エビ リキ セ チ ミ 
し 人 
ハハ り チ レス キン ワイ ロメ キ 


ざー メチ ザキ ニュ コメ ゲ ヤ 


カキ *? サン ニコ ウエ ン テ ア オウ 


/ 和 k in 70 サン シ ニ コ ウエ ン テ ア オウ 


作り チレ スキ ン ワ イロ メキ 


図 1 に 示し た よう に , 左 に 2 字 ず らし て 変換 す 
る と いう の は , 右 に 44 字 ずら すこ と と 同じ に な る し ょ う 。 K$ の 5 番目 な ら L$ の 5 番目 を と り 出 す と 


こと に 注意 し て 下さ い 。 いう わけ で す 。L$ か ら と り 出 し て きた 文字 は B$ に 
プロ グラ ム の 処理 手順 は 次 の と お り で す 。 つう サ て ゆき まず すず 。 そこ で 次 の よう に まとめ られ ま 
プロ グラ ム P19-1 の 手順 ず 8 
@ イ ロ ハ 順 の 文字 列 を KS$ に 作る ( 長 さ 46 宇 )。 
@ 以 下 を 反復 する 。 @BS の 初期 値 を 空 の 文字 列 に する 。(B$ に 何 も 
@ 文 を AS に 入力 する 。 入っ て いな いよ うに する 。) 
@ カ 2 ギ の 値 を し に 入力 する 。 @S5 の 文字 が ある 限り 以下 を 反復 する 。 
@ し が 負 な ら . その マイ ナス を と っ た 数 を 46 @AS の 次 の 1 文字 が K$ の 何 番目 に ある か を 調 
か ら 引 いた も の (46 二 L ) を 改め て し と する 。 べ る 。 
@[ し が K よ り 大 きい か また は ゼロ より 小さ い @ KS に な けれ ば 次 の 文字 に 移り ,K$ に あれ ば 
な ら ば , ブザー を 鳴ら し て 再 入力 を 促す 。 それ と 同じ 位置 の LS$ 中 の 文字 を BS に 結合 
(入力 時 の L が 負 で も 上 の 段階 で 正 に な っ 9 の 。 
て いる は ず 。) 人 委 
@ イ ロ ハ の 列 を し だ けず らし た 文字 列 を LS$ に 田 ブ ログ ラム P19-1 の 説明 と 実行 例 
作っ て お く 。 主要 な 行 だ け と りあ げ ま す 。 
@| AS を BS に 変換 する 。| 行 20 一 50 は 表示 の 都合 で 1 行 が 長く な ら な いよ 
@BS を 印字 する 。 うに 分 け て , KS に イロ ハ の 文字 列 46 字 を 入れ ます 。 
A$ を B$ に 変換 する に は , AS$ を 1 字 ず つと り 出 行 60 は AS に も と の 文 を 入力 し ます 。 
し て , イロ ハ 順 で K$ の 何 番 目 に ある か 調べ ,L$ の 行 70 一 170 が 反復 され , 図 キー で 終了 させ ます 。 
それ と 同じ 位置 の 文字 を と り 出 し て くれ ば よい で 行 80 は 上 が 負 の と き , た と えば し テー 2 の と き , 


† 機種 X 々 で は 文字 列 を 扱う た め の 記 人 憶 場所 を 普通 は 300 字 分 程度 に 制限 し て あり ます 。 こ の プロ グラ ム で は いろ 
いろ な 文字 変数 を 使っ て いま す の で , 70 字 以上 の 文章 を 入力 する と き は 短く 切っ て , それ ぞ れ ご と に 変換 し て 下 
さい 。 あるいは 文字 用 の 記憶 領域 の 制限 を CLEAR 文 で CLEAR 500 な ど と 変え ます 。 
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L に 46 十 し =46 一 2 を 入れ な お し ます 。 

行 100 は KS$ の 右 の 46- し 字 と 左 の し 字 を と り 出 し , 
その 順に 結合 し て L$ を 作り ます 。 

行 110 か ら 150 で A$ を B$ に 変換 し ます 。 行 110 は 
BS を 空 の 文字 列 に する 前 処理 で す 。 

行 120 は I を 1 か ら A$ の 長 さ 分 まで ( 1 ずつ ) 変 
えて , 行 150 ま で の 反復 を 指示 し ます 。 

行 130 で は MIDS(A$, !, 1) で AS の 1 番目 の 1 文字 
を と り 出 し , INSTR (イン スト リン グ ) 関数 で そ 
れ が KS$( イ ロ ハ …) の 何 字 目 に ある か を 調べ ます 。 
K$ の 中 に な けれ ば J の 値 は ゼロ に な り ま す 。 

行 140 は J が 正 な ら BS に LS の J 番目 の 1 文字 を 


結合 し ます 。 
この プロ グラ ム P19-1 の 実行 例 ! を 表示 2 に 示し 
ます 。 
サン ジ le 7 ログ の 77 ョ か テ / 
3 時 SA 人 RS 聞 。 で ES 会 お の 
と いう 文 が . し を 9 に する と 


娘 DEEDD モ ア た 
と わけ の わか ら な い 文 に な っ て いま す 。 

逆 に , シー ザー 式 暗号 を 解く に は , この 同じ プ 
ログ ラム 了 P19-1 が 使え ます 。 暗号 を 入力 と し て , 
いろ いろ カギ を た めし て それ らし い 文 を みつ け だ 
せ ば よい の で す 。 表示 3 に 実行 例 を 示し ます 。 カ 
ギ と し て 一 9 を 与え た と き に 

(の ES 4 ピグ 
と な っ て いて , どう や ら 解 読 で きた よう で す 。 


較 転 言 式 


次 に 転 置 式 の 作り 方 を 考え て み ま し ょ う 。 これ 
は 文字 は その まま で , 並び の 順序 を 適当 に 入れ か 
えて 暗号 を 作る 方 法 で す 。 マス 目 の 入 っ た 用 紙 に 
文章 を 書き , 横 に 書い た な ら 縦 に と り 出 し て ゆき 
ます 。 た と えば , 次 の 図 の よう に 横 に 入れ た も の 
を , 


アデ ャ ジ シャア 2 こっ 細 抽 め 4 
と と り 出 し ます 。 次 の 暗号 は わか り ま すか 。 
28Y2NS 5 コッ 260 が 20 た ナッ 7 本 
これ は 文章 で は な く 人 の 名 前 を 並べ た も の で す 。 
棋 の マス 目 に 入れ て 最後 の 行 で 余り が 出 た の は , 
あと で と り 出 す と き に つめ て いま す 。 下 の 配置 表 
を 見 て 下さ い 。 


ッ グ 3 


較 転 置 式 暗号 プロ グラ ム 


転 置 式 暗号 を 作る プロ グラ ム は , いろ いろ な 作 
り 方 が で きま す 。 マス 目 を 文字 用 の 2 次 元 配列 

と 考え て 順に 入れ て ゆく の が いち ば ん 自然 で し ょ 
う 。 プ ログ ラム P19-2( 表 示 4 ) は そう いう 作り 方 
を し て いま す 。 こ の よう に 単純 な 変換 だ け な ら 配 
列 な ど を 使わ ず に 短い プロ グラ ム で 実行 で きま す 。 
プロ グラ ム P19-3( 表 示 5 ) を 見 て 下さ い 。 まず, 

先頭 の 文字 か ら は じ め て 横 の マス 目 分 の N 字 お き 
に 文字 を と り 出 し ます 。 次 に 2 番目 の 文字 か ら N 
字 お き に , と いう 具合 で すべ て の 文字 を と り 出 し 
て ゆけ ば よい の で す 。 図 2 を 見 て 下さ い 。 こ の 二 
つの プロ グラ ム は 滴 点 や 半 滴 点 が ある と 困る こと 
が ある で し ょ う 。 マス 目 に 手 で 書き 込む 場合 な ら , 
2 ンー 和 AYr 9 6 の WeSN 0 っ )k6 
まう 。 れれ が が G き る よう に 正夫 する こと も や お も し 
る ろ い の で す が , ここ で は その 基本 に な る プロ グラ 
ム P19-2 に つい て だ け 説 明 を し て お きま し ょ う 。 
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表示 4 プロ グラ ム P19-2 


は (的 所 半 ニ P ま ウー スク アウ Ha 本 もの り 
20 DIM C ま (10,10) 

30 INPUT "カナ ノ フン”) まま 

40 INPUT "カキ * "jjN 

っ 0 L=LEN(^A ま も) 

60 M=INT((L-1 )/N)+1 

70 K=0 

80 FOR 1=1 TO NM 

20 FOR J=1 TO N 

100 K=K+1 

110 C ま ([,J)=MID ま (A ま ,K,1 ) 
な EK キ 

130 NEXT I 

140 FOR J=1 TO N 

150 FOR 1=1 TO M 

160 PRINT C ま (T。J)5 

170 NEXT 

180 NEXT JiPRINT 

120 GOTO 40 


5 0 ジ 


実行 例 を 表示 6 に 示し ます 。 


圏 プ ログ ラム P19-2 の 説明 


行 206 は マス 目 用 の 2 次元 配列 で す 。 文字 を 代入 


表示 6 プロ グラ ム P19-2 の 実行 例 


カナ ノ 
カキ "? 4 

カオ ハル 本 ミリ コラ リ イ ナ リ チ ナ カエ エ 
し と 凍っ 1 

カコ リエ ワナ エミ イカ ホ ナ ハリ オラ チ 
し 

カナ ホワ り カ リ イ 人 ハチ ナラ エ オ リ ミ ュ エ 
の 中 


フン ? カワ イナ オ コ ナ カ ハラ リエ ホリ チエ ミ 


ー ィ 


表示 5 プロ グラ ム P19-3 


また まき テッ コ " の くき ) 

20 INPUT "カナ ノ フン "jaA ま 

30 INPUT "カネ" " jN 

40 し L=LEN(A$) 

っ 0 IF N<=0 OR N>L THEN STOP 
60 M=INT((L-1)/N)+1 

70 FOR 1=1 TO N 

80 FOR J=I TO L STEP N 

20 PRINT MID ま (A ま 。J,1) ぉ 
100 NEXT J 


110 NEXT Iz: PRINT 
半 GOTO 30 


ョ アツ 


する の に 使う の で $ が つい て いま す 。 

行 30 は も と の 文 を AS に 入力 し ます 。 

行 40 は マス 目 の 横 の 数 を 暗号 の カギ と し て 入力 
じ ま す 。 

行 50 で は A$ の 長 さ を し に 覚え ます 。 

行 60 は 、 マス 目 の 縦 の 必要 行 数 を 調べ て いま す 。 
L が N で ちょ うと 割り 切れ る と き と 割 り 切れ な い 
と き を 一 つの 式 で 処理 し て いま す 。 N = 4 で L= 
20 や 21 の と き に , し か ら 1 を 引い て か ら 4 で 割っ 
て それ を 整数 化し て 1 を 加え て いる の で , M が と 
も に 5 に な る と ころ を 試し て 下さ い 。 工 を 直接 に 
4 で 割る と 20/4 三 5 , 21/4=5.1 で これ ら の INT 
を と っ た だ け で は 21 の と き M= 5 で は 不足 が 起こ 
り , INT を と っ て 1 を 加え る と 20 の 方 で 余分 な 1 
行 を 作る こと に な り ま す 。 こまかい と ころ で す が 


注意 し て 下さ い 。 


N= テ 4( カ ギ ) L ニ 17( 文 字数 ) 


まず 先頭 か ら は じ め て 4 宇目 ご と に 


カ 2 だ が ーッ り エエ ホ チ 。 宇 33 1 三 2 
次 に 第 2 字 目 か ら 4 宇目 ご と に と り 出 す 
カワ. 倫 - ナ オォ コ 。 欠 - み タク ハ ララ 5 答 .= ホリ に 二 に ュー3 
}j 三 *… 十 4(4 お き に 工 を 越え な いと ころ まで ) 
図 2 
et た So Re た ミ 1 王 4 プロ グラ ム P19-3 
4 回 目 で 終り (N ニ 4) 行 70 一 110 の 説明 


(N=4, L テ 17) 
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行 70 一 130 は マス 目 に 相当 する CS に 1 字 ず つ 書 
き 込 む 三重 ルー プ で す 。k は 前 処理 で ゼロ に し , 
ルー プ の 内 側 で 1 ずつ 増し て AS の k 番 目 の 文字 を 
と り 出 す の に 使い ます 。 二 重 の for 文 で は 外側 の 変 
数 i は マス 目 の 行 を , 内 側 の 変数 } は 横 の ケタ 数 
を 制御 し て いま す 。 

midS (AS, k, 1) 
で k が AS の 長 さ より 大 きく な る と 空 の 文字 列 を 与 
あさ だ の 相 の 問 。 


行 130 一 170 は 配列 C$ を 1, 1), (2, 1) … と いう 
縦 方 向 に 追っ て その 文字 を 印字 し て 暗号 を 作っ て 
いる 部 分 で す 。 二 重 ル ー プ の 変数 の 順序 が 前 と 違 
っ て いる こと に 注意 し て 下さ きい 。 

な St の の の ロ グラ が の 決 錠 の 文選 主人 司 錠 ナ 
の 文 に 限り ませ ん 。 転 置 式 の 考え を 理解 する の に 
1a2.839: な ど を 大 力 じ て み で 下さ い 。 


暗号 作り の プロ グラ ム で 文字 処理 の 基本 を 練習 
ば まま | 展 湊 8 
①③① プロ グラ ム P19-1 は 暗号 作り と 解読 の 両方 に 
使え ます 。 左 に ずら すこ と と 右 に ずら すこ と は 
本 質 的 に 同じ , つま り , 左 に 2 ずら す の は 有 へ 


や っ 


① プロ グラ ム P19-3 は 短い の で す が , そこ で 便 
われ て いる 考え 方 に 慣れ る よう に , 図 2 を 見 な 
が ら 理 解 を 深め て 下さ い 。 

⑨ プロ グラ ム P19-1 を 英文 用 に 変え て 下さ い 。 

③ 表示 7 に 「 黄 金 虫 」 の 暗号 を 表示 8 に 対応 する 
英文 を 示し ます 。 変換 表 ( 表 1 ) を 使っ て 相互 に 
変換 し た り , 文字 の 使用 頻度 を 調べ て 見 て 下さ い 。 


表示 7 「 黄 金 虫 」 の 暗号 

3 持寺 +305 ) )6" 4826 )4 村 
。)4 柏 ) 8067" 』48+8%%60 ) ) 
85 1 』 18? : :#?8+83(88)5 
9?+546(5887967?38)? 欄 ( 
? 485 ) ? 5?+2。 ?( 4956? 
2(5? -4)8%8? 34069285 ) 
3 )6+8 ) 4 村 村 3 1( 半 9 48081 
8:8 村 1 , 48+85 4 ) 485+5 
28806? 81(#9348j(88j4 
(#?34j48)4 村 5161::188 
3 提 5 


2 DSO 4 


46 一 2 の 44 ず ら す の と 同じ こと で す 。 

② INSTR や ゃ MIDS の 文字 処理 用 の 関数 は 慣れ て く 
る と 大 変 便利 で す 。 

⑧③ 二 つ っ の 表 で の 変換 は よく 使用 され る 手法 で す 。 


④ イロ ハ 順 に 対し . トリ ナ 順 と いう の も あり ま 
す 。 使っ て みて 下さ い 。 


と りな こ 包 ゆめ 
匂 鳴 く 声 す 夢 さ ませ 
み あ ひん が し 
見 よ 明 け わ た る 東 を 
そら いろ お き 
空色 は えて 沖 つ べ に 


ほ ふ ね む 
帆船 群れ ね ぬ も や の うち 


表示 8 原文 ('- . 空 百 を と っ て ある ) 
agoodgl assin モ hebisho 
pshoste 1 inthedevi 1 ss 
Ga 七 上 りら ロモ エッ On ら dd ほら 9 じ GGSa 
nd モ th iteenm1nu モ enOF 
theastandbynorthmain 
branchseventh1 imbeas 
ts=1deshootfromthe ] e 千 
teyeo 千 thedeathsheada 
beelinefTromthetreeth 
roughtheshotf ュ if ャ トッ fee 
七 O 〇 い 七 


ド 0 GS 
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繰り 返し の 模様 


| @ 双 送 日 2 月 16 日 ( 水 ) 念 再 放送 日 2 月 20 日 (日 ) 


これ まで 楽し い 図 案 や 模様 を 表示 する 簡単 な プロ グラ ム を 見 まし た 。 プ 
ロロ コク ラム の 技術 が 上 っ て きた と ころ で , 小さ な パタ ー ン を 画面 いっ ぱい に 
し ャ / ロロ 口 [ 様 り 返 し て 表示 し て み ま し ょ う 。 繰 り 返 し 模様 を 画面 いっ ぱい に 出す と 全 
口語 体 と し て 感じ が よく つか め ま す 。 部 分 的 要素 の バタ ー ン か ら は な か な か 想 
像 の つか な い 感 じ が 出る も の で す 。 


AP の ーー 


の EE 5 

田部 分 と 全体 較 プ ログ ラム の 構想 

図 1 は 文字 X で 作っ た 小さ な パタ ー ン で す 。 こ と ころ で 。 プロ グラ ム も , 実際 に 役に立つ ぞ の 
れ を 画面 いっ ぱい に 繰り 返し て 表示 し た ら ど うな は テキ スト の プロ グラ ム の よう に いつ も 短く な る 
る で し ょ う 。 そ れ が 図 2 で す 。 同様 に , 図 3 から わけ で は あり ませ ん 。 長 い プ ログ ラム で も その 構 
図 4 が 作ら れ ま す 。 カラ ー 真 (86 真 ) に は 同じ プ 成 が 明確 で あれ ば よく 理解 で きま す 。 
ログ ラム で 作っ た 色 つ き の 検 様 を の せ て あり ます 。 さて , 画面 に 繰り 返し 模様 を 描い て その 様子 を 
部 分 的 な パタ ー ン か ら は な か な か 全体 の 様子 が つ 見 る プロ グラ ム P20-2 を 付録 に の せ て お きま す 。 
か め な いも の で , 全体 を 画面 で 見 る こと は 価値 が ここ で は , それ を 作っ た と き の 構 想 を 述べ , その 
ある で し ょ う 。 逆 に , 一 見 複雑 そう で も 全体 を 見 一 部 の 機能 を 短い プロ グラ ム で 見 て み ま し ょ う 。 
て いて その 構成 の 単純 さ が 見 えて くる よう な 模様 この 種 の プロ グラ ム は , そこ に も り 込 みた い 機 
は きれ いな も の で す 。 能 を メニ ュー 方 式 で 選ん で 使っ て も ら う こと を 前 

9 
%xxx 
図 1 小さ な パタ ー ン 

XXXX_%XXX% XXXX_%XXX% XXX% XXXX 
前 前 前 4 4 %xxx バテ シン 

XXXX XXX% XXXX_%XXX% XXX% XXX% XXXX XXXX% XXX% XXXX_%XXXX XXX% 
4 2 4 4 了 %xxx 吉 4 了 了 bo %xxx 
XXX% 1 4 が 1 が 6 旨 紅 る 人 8XXX 
%xxx %xxx %xxx %xxx %xxx %xxx xxx% %xx xxx% &xxx% &xxx xxx% 
4 1 が 了 が が 2 2 | 和 1 

%xxx %xxx% xxx %xxx %xxx %xxx xx% %xxx% %xxx %xxx& %xxx %xxx 
人 4 が 和 人 人 紅 迷 人 誠 8XXX 

xxx% %xxx %xxxX %xxx %xxx %xxx xxx% %xxx% xxx% &xxx% %xxx& xxX% 
図 2 パタ ー ン ( 図 1 ) の 繰り 返し 模様 図 4 パタ ー ン ( 図 3 ) の 繰り 返し 模様 
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提 に し て お く と まとまり が よい も の で す 。 

ここ で は 基本 的 に は 次 の 皿 つ に まとめ て あり ま 
す 。 

BB パタ ダー シ を きめ る 

ce 色 の 使い 方 を きめ る 

d 表示 を 行う 

s パタ ー ン の サイ ズ を 変更 する 

この 庄野 細 結 較 を メニ ュー 方 式 で 選べ る よう に じ 
て いま す 。 それ ぞ れ の 機能 を 説明 し て お きま す 。 
p ) 画面 に それ まで に 使わ れ た パタ ー ン を 表示 し 
て , 簡単 に 変更 修正 が で きる よう に し ます 。 ま だ, 
パタ ー ン が 入力 され て いな いと き は ピリ オド か ら 
成る プロ グラ ム で 用 竜 さ きれ た パタ ー ン を 表示 し ま 
す 。 

c ) 色 の 使い 方 に は 次 の 3 と お り を 考え ます 。 

(1) 画面 全体 で 一 色 

(2) パタ ー ン の 行 ご と に 色 を 指定 

(3) タテ 方 向 の 繰り 返し ご と に 色 を 指定 
d ) 画面 いっ ぱい に パタ ー ン を 繰り 返し 表示 し ま 
す 。 

図 1 の パタ ー ン は , タテ 5 行 、 ヨ コ 6 宇 (編物 
で いえ ば タテ は 段数 , ヨコ が 目 数 で し ょ う ) の 5 
X 6 の 大 き さ の パタ ー ン で す 。 画 面 は 24( ヨ コ )※ 
39( タ テ ) で 使う と し て , タテ , ヨコ に 何 回 繰り 返 
せる か も る ここ で 算出 し ます 。 こ の 構想 で 作っ つた 記 
ログ ラム P20-2 の 実行 例 を スケ ッ チ 風 に 表示 1 
に 示し て お きま す の で 見 て 下さ い 。 


圏 プ ログ ラム P20-1 


ここ で は data 文 に 用 意 さ きれ た パタ ー ン を 読み 込 
ん で , 画面 いっ ぱい に 繰り 返し て 表示 する プロ グ 
ラム P20-1 を 説明 し て お きま す 。 プ ログ ラム は 表 
示 2, 実行 例 は 表示 3 に あり ます 。 
プロ グラ ム P20-1 の 負 理 手順 

基本 と な る パタ ー ン を data 文 に 用 意 し ます 。 まず 
タテ と ヨコ の 寸法 を 与え ます 。 次 に パタ ー ン を data 


文 に 引用 符 で くく っ て 与え ます 。 引 用 符 は 先頭 の 
空 百 を 有効 に する た め に 必要 で す 。 パ ター ン は 使 
用 する 寸法 より 大 きめ に 作っ て お いて も よい よう 
に し て あり ます (パタ ー ン の 左上 が 使わ れ ま す )。 
実際 に 使用 する 寸法 を 先頭 の data 文 に 与え ます 。 

@ 画 面 を 色 つ き で 寸法 を 40X25 で 使う こと を 指 
示す る 。 

@ 使 用 する パタ ー ン の 寸法 を M (タテ の 行 数 ) 
と N (ヨコ の けた 数 ) に 読み 、 パタ ー ン を M 
行 分 読み 込 な が ら , 画面 に 表示 する 。 

@ タ テ と ヨコ の 繰り 返し 数 を 求め る 。 

@ 以 下 を 反復 する 。 

@ 色 指定 を 入力 し , 色 を 指定 する 。 
@ 画 面 を いっ た ん 消去 する 。 
@ パ バターン の ヨコ の 寸法 (N ) に 合わ せ た 書 
式 を 用 意 を する 。 N は 2 以上 と 考え る 。 
。 画 還っ ぱい に バタ ー ン を 独 く | 
画面 いつ っ ぱい に パタ ー ン を 描く 部 分 は 次 の よう 
に 3 重 の ルー プ に な り ま す 。 

@ タ テ の 繰り 返し 回 数 分 だ け 以 下 を 反復 する 。 
@ パ ター ン の タテ の 行 数 分 (M) に つい て 
i を 1 か ら M ま で 変え 以下 を 反復 する 。 

@ ヨ コ の 繰り 返し 回 数 分 以下 を 反復 する 。 
@ バ ター ン の 第 i 行 を 改行 な し に 描く 。 
@ 改行 す る 。 

この 処理 の ルー プ の 構成 に つい て 図 5 を 見 て 下 


さい 。 


③ 
3】 Ear Ghzr PohsPm 
の 1 較 還 還 | 一 一 
本 一 - 


由 


外側 か ら ①,②.③ の 
順に ルー プ を 作る 


図 5 繰り 返し の 構造 
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表示 1 


| 


プロ グラ ム P20-2 を 使っ て いる と き の 画 面 


| 


SE 
P( 人 "ター ツン ) c( イ ロ ) d( ヒ ョ ウシ " ) s( サ イス ` ) 
? gs で メニ ュ エーーーーーーー ニ ーーー 
ターン パ バル 当 問 の XLS P( 八 "ター ン ) c( イ ロ ) d( ヒ ョ ウシ " ) s( サ イス ) 


クニ ウリ の テー だ 62 の 0 7 
1 スチ 本 go 


XXX% 空白 を 含め て 行 ご と に パタ ー ン を 
% 入力 し て ゆき ます 。 
SA その と き [RETURN] キー は 使い 
8 ませ ん 。 る 
Bl を た た - た いた ーーーーーーーー メニ ュー 一 一 ーーーーーー 
敵 ま が だ さき 5203 生 か 和 p( 作 ターン) c( イ ロ ) d( ヒ ョ ウラ ) s( サ イス ) 


の 字数 だ け も どっ て パタ ー ン を 修正 
で きま す 。 


の い 

し 1 (人 

人 科 コッ タオ た ジ 5 の 70 ター ェ ン ツキ ド ョ ウト コリ ド ) 
16 と み JP AS フル た la 0 中 0) 


9 

2 バグ リガ エー の 7 の ガイ: 人 

ムリ ルリ ん ザン 人) 

10 の ログ リカ ES ポタ 06 いくこ カ 37. 6 
人 RE 7 0 2 


問 お 。、。。。) 


Ss メ ミ グリ カエ シ 


| 6 | 図 2 の 繰り 返し 模様 が 出る (画面 は 色 つ き ) 


間 DOUTHT 
MIHIIMTUT 
UTU 
| 二 較 | 、 OTCTETR 
EE 


陸 


RETURN) キー な と 適当 な キー を 押す と 再び 
メニ ュー が 表示 され る 。 


表示 2 
プロ グラ ム P20-1 / 10 REM P20-1 ] 
20 DIM P ま (10) 
30 CONSOLE 0.25.0。1:MIDTH 40,25 
40 REM ニー ニー 八 " タ ー ン ノ ヨミ コミ ーー-ー 
50 READ _M,N 
60 FOR J=1 TO M 
0 READ P ま (J):PRINT P ま (J) 
80 NEXT J 
90 REM ーーー クリ カエ シ ーーー 
100 19=INT(25/M ) : J9=INT(38/N ) 
110 REM。 ニ ニー: TH ~ ノ シテ イ ニニ ー 
120 LOCATE 0,24:INPUT "イロ "3C 
130 IF C=0O THEN 120 
140 COLOR CiPRINT CHR ま (12)5 


150 REM --- ショ シキ ヲ ツク ル ーーー 
160 F ま ="&"+STRING ま CN-2,。" 「)+'&" 
170 REM --- クリ カエ シ モヨ ウ ーーー 


180 FOR 1T=1 TO 12 

120 FOR 11=1 TO M 

200 RBRR 志和 ま TON 

210 PRINT _ USING F ま jP ま (IT1)} 
220 NEXT JiPRINT 


250 GOTO 110 
を 9 は RE ーー タ ーA の そ 
70 RE 料 の の ヨナ か で 
280 DATA 4,6 


310 DATA "へ 全 /“ 
320 DATA "キキ 手 『 
330 DATA 9 
ヽ 、340 END ノ 


表示 3 N 
プロ グラ ム P20-1 の 0 0 本 ソン ン ン マツ @ 
実行 結果 と を と る を と を スク と を る 
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圏 書 式 の 利用 に つい て の 補足 


プロ グラ ム P20-1( 表 示 .2') で は 
160 F$= ' 負 ! 二 STRINGS(Nー2, " 
210 PRINT USING F$:P$ (11 ): 
0 の: が あめ り : ま 9 は 38SU NN 学 '6 な 
ら , 行 160 で は , 品 は 空白 を 意味 する と し て 


中 入 0 


1 王 ・ ゴ RT き TBT 二 い * 
ど となり 。 行 210 は 
PRINT _ USING 太史 PS⑪) 

と いう こと に な り ま す 。 こ の 形 の print using 文 は 
すでに 出 て きま し た 。 文字 列 P$ (1 ) を 8 けた の 
印字 欄 に 左寄せ で 印字 せよ と いう 意味 で すね 。 こ の 
print using 文 を 使う 書式 指定 を 行 160 の F$ に 作 


っ て いる わけ で す 。STRING $ と いう 関数 は , 第 1 
の 引数 で 指定 され た 個数 の 長 さ の , 第 2 の 引数 に 
ある 文字 列 の 先頭 の 1 字 に よる 文字 列 を 作り ます 。 
eo と 負っ 

STRING$ (5, " 半 錠 " ) 
と あれ ば , 半 半 韻 装 井 と いう 文字 列 を 与え ます 。 


表示 4 


即時 実行 で 確認 し て み ま し ょ う 。 


? モ ing ま (5。"&”) 


韻 韻 韻 提 
0k 
較 メ ニュ ー と 仕事 の 振り 分 け 
メニ ュー で れ た 仕事 へ マイ コン の 処理 の 流 


れ を 振り 分 ける 分 岐 さ せる 一 一 の に 第 17 回 で 
は on-goto 文 を 使い まし た 。 付 録 の プロ グラ 
-2 に は on-goto 文 も 使わ れ て いま す が ,。 も う 一 つ 
on-gosub 玉 と いう 文 を 主 な メニ ュー の と ころ で 
使っ て いま す 。 そ の 部 分 を と り 出し て 説明 し て お 
きま し ょ う 。 

部 分 的 に 抜き 出し た プ 
に な て ゆま す 。 
・ 行 150 と 160 で メニ ュー を 表示 し て いま す 。 そ の 


ム P20 


ログ ラム は 表示 4 の よう 


や で は pjdc,s と いう 文字 で 選び ます 。 
・ 行 170 で は p, d, c,。s の いずれ か を 」J$ に 受 
り ま す 。 行 180 で は "pdcs" を 値 に も つ C$ に 
J$ が 盆 ま れ て いる か を INSTR 関 数 で 調べ ます 。 


の 


150 PRINT "ーーーーーーーーー メニ ュー 

160 PRINT "p(A? ターン ) c( イ H) d( ヒ ョ ウシ 
170 INPUT J ま 

180 H=INSTR(C ま 。J ま ) 

190 IF H=0 THEN BEEP:GOTO 170 
200 ON H GOSUB 220,380 , 600 ,740 
210 GOTO 110 

|220 REM === "ター ン ノ ヨミ コミ === | 


AA 


PD は Lv ん の 人 


C$="pdcs" と な っ て いる 


一 H=1 の と き 


トー テテ 2 の と き 
590 RETURN 8 RS 
600 RE ニニ ニー ヒ ョ り シ い ニニ ニー 
た な さら トーH=3 の と き 
ア 40 RE ち う 5 サイ ス ” / ウゴ 9 ==5 | 
FCM H= テ 4 の と き 
800 RETURN 隊 
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も し あれ ば その 位置 の 値 ., な けれ ば ゼロ を 左辺 
の H に 与え ます 。 

・ 行 200 は その H の 値 1.2.3.4 に よっ て gosub の 右 
の 行 番号 220,380,600,740 か ら の サブ ルー チン へ 
飛べ と いう on-gosub 文 で す 。 on-goto 文 と の 條 
い は goto 文 と gosub 文 の 違い と 同じ で , 飛ん だ 
先 で RETURN が 実行 され る と 自動 的 に 戻っ て く 
る こと で す ( こ の 場合 210 へ )。 飛ぶ 先 が サ ブル ー 
チン に な っ て いる と ,。 その 中 で は RETURN を 使 
えば ど ご べ 戻 る か 配 友 な く で て よる 計 各 友 吉 そ 
の サブ ルー チン を 別 の と ころ で 利用 する こと も 
で きる と いう 利点 が あり ます 。 
以上 に 述べ た メニ ュー を 1,2j3 で な く 文 字 で 選 

ん だ と き の INSTR 関 数 の 利用 と on-gosub 文 の 使 

い 方 は 応用 の きく 手法 で す 。 


on- gOSub 文 

・ オ ン ・ ゴ ウサ ブ と 読み ます 

・ 一 般 に 

on 数 gosub 行 番号 , 特番 号 .… 

の 形 で す 。 

・ 変 数 の 1, 2,… の 値 に よっ て , 順に 右 の 行 番号 か 
ら 始 まる サブ ルー チン へ 飛び ます 。 サ ブル ー チ ン 
で returm 文 が ある と , この on-gosub 文 の 次 に 戻っ 
ECG2 科 : ま 全く 


一 補足 


小さ い パ ター ン を 画面 の あちこち に 書い た り , 
移動 きせ る 方 法 に は get@ 文 と put@ 文 を 使う 方 法 
が あり ます 。 参考 まで に プロ グラ ム P20-3 を 付録 
に の せ て お きま す 。 そ の 方 法 は print 文 や locate 
文 の 組み 合わ せ で パタ ー ン を 動か す の に 比べ て 速 
度 の 点 で まさ り ま す 。 


ポイ ント 


小さ な パタ ー ン を 画面 いっ ぱい に 出し て 全体 の 
感じ し を つか むための プロ グラ ム の 基本 を 学び まし 
7 る 
① for 文 を 何 重 に も 使っ て 短い プロ グラ ム で 複雑 

な 反復 を 行う こと が で きま す 。 


② print using 文 で の 書式 は 別に 文字 変数 に 作 
9 ぐ お MY で 使 つ Ne の NG き * ま 9 

⑧ メニ ュー 方 式 で の 文字 コー ド で の 選択 と 振り 
分 け の た め に INSTR 関 数 と on-gosub 文 が 便利 に 
使え ます 。 


BMN 


① プロ グラ ム P20-1 の data 文 を 変え て ,。 いろ い 
ろ な 模様 を 作っ て みて 下さ い 。 

② プロ グラ ム P20-1 を 改良 し て , 画面 全体 を 1 
色 で な く , タテ の 繰り 返し ご と に 別 の 色 を 使え 


た り , パタ ー ン 内 の 行 ご と に 色 を 変え られ る よ 
に し て 下さ い 。 プ ログ ラム P20-2 を 参考 に し 


う 
6: ホ 人 さ 35 
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ブロ ッ ) 
ッ ク 遊 び 
念 放送 日 2 月 23 日 ( 水 ) 、 念 再 放送 日 2 月 27 日 (日 ) 


きれ いな 色 の つい た 大 き さ や 長 さ の 違う 数 種 の プロ ッ ク を 組み 合わ せる 
遊び は 子供 の 創造 性 を 養い ます 。 表 示 画 面 の 上 で の ブロ ッ ク 遊 び を や っ て 
み ま し ょ う 。 画面 上 の 置き 場所 や プロ ッ ク を 置く 方 向 な ど は テン キー を 使 
っ て きめ て ゆき ます 。 色 つき の 図案 や 検 様 も 楽し め ま す 。 


圏 プ ロッ ク の 種類 と 置き 方 


画面 上 に 置け る プロ ッ ク は , 図 1 の よう に グラ 
フィ ッ ク 文 字 の 田 を 並べ , 好き な 長 さ と 8 種 の 色 
を 選ぶ こと が で きま す ( 表 1 ),。 プロ グラ ム P21-1 
(表示 1, 134 一 135 頁 ) を 実行 する と , まず 

イロ ? 

オオ キサ ? 
の 順に , 使用 する 色 と 大 き さ (ブロ ッ ク の 長 さ ) 
を きい て きま す 。 色 は も う 何 回 も 使っ た よう に 表 


1 の 待 号 で 答え ます 四 キ ー を 押し た と き  [ 同 キ ー を 押し た と き 
画面 の ほぼ 中 央 に * 印 が 点滅 し て いま す 。 こ の 生計] LTT 
※ 印 を テン キー で 好き な と ころ に 移動 し ます 。 図 国 キ ー を 押し た と き キー を 押し た と き 


2 で 移動 の 仕方 を 説明 し ます 。 テンキー[ を 中 心 
に 左 を 押せ ば 左 に , 上 を 押せ ば 上 に , 斜め の キー 
を 押せ ば [5] か ら 見 た ら そ の 方 向 に と いう 具合 で す 。 


※ 印 は カー ツル が わり と いう こと で す 。 図 3 ブロ ッ ク を 置く 方 向 の 指定 

(プロ ッ ク の 色 と 大 き さ は 指定 済み と する ) 
※* 印 を 移動 し て 止め た と ころ で 図 3 の よう に プ 
8 りこ 半 語 ロッ ク を 置く こと が で きま す 。 テンキー の 上 の 曰 
PP の キー を 押せ ば * 印 の と ころ か ら 右 側 に , [人 を 押 
し た Ao た うん せ ば *※ 印 か ら 上 に と いう 具合 で す 。 昨 凶 に は 機種 
表 1 色 の 符号 X で は [SHIFT] キー を 押し な が ら 行 うこ と が 必要 
] 青 5 水色 ( 青 緑 ) で す が , 以下 で は , その こと は 省略 し ます 。 同じ 

ら - 赤 6 黄 プロ ッ ク を 何 回 も 続け て 置い て ゆけ ます 。 
3 柴 7 白 プロ ッ ク の 色 と 大 き さ を 変え た いと き は , ピリ 


の 。 画面 の 下 の 方 で イロ ? , 
4 緑 0 黒 (消す の に 使え ます ) オド の キー[ を 押し ます 。 画面 の 下 の 方 
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オオ キサ ? と きい て でき ます 。 

すでに 画面 に 表示 され て いる ブロ ッ ク を 消し た 
いと き は , カナ の キー 連 を 押し ます 。 す る と , * 
印 を 移動 きせ て 消す こと が で きま す 。* 印 の あっ 
た 場所 が 移動 に よっ て 消さ れ ま す 。 

この プロ グラ ム を 終了 し た いと き は 了 連 の キー を 
押し ます 。 

以上 の キー の 使い 方 を 表 2 に 整理 し て お きま す 。 
また , 表示 1 の プロ グラ ム P21-1 の 説明 文 も 参照 
し て 下さ い 。 な お , この プロ グラ ム を 使っ て 描い 
た 作品 は カラ ー 頁 (87 頁 ) に あり ます 。 


較 た た いた キー を 知る に は 


つの 2 が 0 が の る デブ デ ロ グ ラ だ で 仁義 の だ だ 
いた キー を プロ グラ ム 実 行 の 途中 で 見 分 ける 必要 
が あり ます 。 こ の た め に は , INKEY$ と いう 特殊 
な 関数 を 

450 XS$= ニ INKEYS : IF XS$= "THEN 450 
と いう よう な 形 で 使う の が 典型 的 で す 。 こ の 文 で 

X$ に は , キー を 押さ な い 間 は "" と 同じ “ 長 さ 0 
の 文字 列 ” 一 一 空 の 文字 列 一 一 が 入り ます 。 キー 
が 押さ れる と , 右 の 正 -then 文 で 次 の 行 に 移り ます 。 

プロ グラ ム P21-1 の 行 400 か ら の サブ ルー チン 
で は INKEY$ を 用 いて いま す 。 サ ブル ー チ ン 全 体 
は や や こっ た こと を し て いま す の で 後 で 説明 し ま 
13968 

X$ に 受け と っ た の が どの 文字 で ある か を 判別 
する に は , これ まで 何 回 か 使っ た 方 法 で , 使用 す 
る 区 人 年 あさ こざ I で 8 MS に は) 並べ で お ので 

1= ニ INSTR (M$, X$) 
を 使う こと に し ます 。 X$ が MS$ の 何 番目 に ある 
文字 か 判別 され ,、 も し な けれ ば 1 の 値 は ゼロ に な 
り ま す 。 そこ で M$ に 使用 する 文字 列 を 次 の よう 
條 作ら (で お きま 95 
M $ = 『! 123456789." 十 CHR $ (28) 
M$=MS 十 CHRS(29) 十 CHRS(30) 士 CHRS(31) 
M$=M$ 十 " ケ オ " 


表 2 キー の 使い 方 


キー 機 能 
天 印 の 方 向 に ブロ ッ ク を 置く 
ロト (5] * 印 を 還 を 中 心 に 8 方 向 に 動か す 
区 


色 と 長 さ の 指定 を 変更 する 


画面 上 の プロ ッ ク の 一 部 を 消す 
トス 
その 場所 が 消え る 


プロ グラ ム の 実行 の 終了 


ざれ は の グラ ババ の 行 50 有 707 ぐ すず 。 ご て で GOHRS$ 
と いう 関数 が 使わ れ て いま す 。 皆さん は , 画面 消 
去 に 使わ れる 
PRINT CHR$(12): 

と いう 凛 を すでに ご 存じ で し ょ う 。 CHR$ は カッ 
コ 内 の 値 に 対す る 文字 を 与え る 特殊 な 関数 で す 。 
文字 の 一 つ ー つ に は 0 一 255 の 番号 が つい て いま す 。 
特殊 な 働き を する 文字 は キー に は な い の で , “1 
どの 0 の 02 いう よう に 書け ませ ん 。 (そこ ご で 8 
HR$ を 使っ て 作り 出せ る よう に し て ある の で す 。 
28 は 回 , 29 は 回 , 30 は 団 , 31 は 還 の 番号 で す 。 
この よう な 文字 の 番号 は 符号 (コー ド ) と いわ れ ま 
す 。 付録 に 文字 の 符号 表 を の せ て お きま す 。 


圏 プ ロック を 置く 処理 


プロ グラ ム P21-1 の 行 290 一 390 は プロ ッ ク を 画 
面 に 置く 一 一 表示 する ーー サ プ ブルー チン で す 。 変 
数 C は 色 符 号 。. し に は ブロ ッ ク の 長 さ が 記憶 され 
て いま す 。locate 文 を 用 いて , 左右 上 下 の 好き な 
方 向 に 長 さ し の ブロ ッ ク を 置け る よう に 工夫 され 
て いま す 。! の 11 一 14 は 斬 加 印 凶 に 対応 し て い 
ます 。 *※* 印 の 位置 は ( 双 、。 Y ) に な っ て いて , 

右 へ 置く 思 な ら メニ テ メ 二 1 

左 へ 置く 加 な ら XX メー1 

上 へ 置く 田 な ら Y= テ Yー1 

下 へ 置く 還 な ら Y テ Y 二 1 
を L 回 繰り 返し て , グラ フィ ッ ク 文 字 較 で プロ ッ 
ク を 描き ます 。 ブロ ッ ク を 描い た あと , ※* は その 
方 向 に ブロ ッ ク の 外 に 出 て 表示 され ます 。 


133 


還 * 印 の 移動 


カー ソル の か わり の ま * の 移動 の 処理 は , 先 に 説 
明 し た よう に , 円 一 [9】 の テン キー を 使い ます が , 
画面 の * 印 の 位置 が (X, Y ) の と き , 

軌 な ら 5Xー1, Y-1) [8] な ら (, Y-1) 団 な ら 5+1. Y-1) 

[4] な ら ー1, Y+0) ( 訓 な ら (X, Y+0) ( 全 な ら (%+1. Y+0) 

国 な ら Xー1, Y+1) な ら (X, Y+1) 国 な ら +1, Y+1) 
に ※P 印 を 移動 きせ ます 。 こ の 位置 の 計算 は せ -then 
文 や on-goto 文 を 使っ て 一 つ 一 つ 書 け ば よい の 
ie が ブログ ラバ の 符 230 に ある よう 避 .T を 注 
ー に 対応 し て 1 か ら 9 の 値 を と る と し て 

X メ ニー メー1+(1+2) MOD 3 

Y テ YーINT(I 一 4④/3) 
と まとめ る こと が で きま す 。 こ の よう な 多く の 場 
合 を 一 つの 規則 で まとめ る 工夫 も また 楽し いも の 
で す 。 [の キー に つい て 確か め て みる と , 上 の 文 
の 右辺 は それ ぞ れ 

メー1 十 (7 十 2) mod 3 ふる メ ー1] 十 0 ラメ ー1 

YーINT(⑦ー4)/3) ゅ Yー1 
と な り ま す 。 


表示 1 プロ グラ ム P21-1 


人 柏 色 門 2 まま 
20 DIM M(10) 


40 PRINT CHR$ ま ( 12 ) 
50 M ま ="123456789 . "+CHR$ ま ( 28 ) 


70 Mb=M+ "か オ " 
80 X=18:Y=12:F=0 


100 LOCATE 0,24:TINPUT "イロ" C 
120 INPUT "オオ キサ 『 ョ 』L 


次 買 に つづ く 
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30 CONSOLE 22.3,0,1:MIDTH 40,25 


60 M ま =M ま +CHR ま (29 )+CHR ま ( 30 )+CHR ま ( 31 ) まさ 


ペーーーーーーーーーーー グ の は 消す 。 
20 REM -ー- イロ ト オオ キサ ヲ キク ーーー 

110 IF C<0 OR C>?7 THEN BEEP:GOTO 100 

130 IF L<1 THEN BEEP:GOTO 120 


較 プ ログ ラム P21-1 の 手順 


処理 手順 は 次 の よう に な っ て いま す 。 

@ 準 備 . 画面 (40X25) の 準備 。 MS (使用 する 文 
文字 列 ) の 作成 ,* 印 の 初期 の 位置 (バニ 18:Y=12) 

@ 以 下 を 反復 する 。 

@ プ ロッ ク の 色 と 大 き さ の 指定 
(変数 C を 色 待 号 . を 長 さ の 記憶 に 用 いる ) 

< ほ ー を Xscama | 

[に XS に 対す る 番号 (0 一 16) を 入れ る 。 
0. 使 用 し な い キ ー な の で ブザー を 鳴ら す 。 

凍 N F ド = 1 で わか る ) キ ー が ピリ オド 
( 1 =10) で な けれ ば 消去 する 。 

F ピ リオ ド (1 テ 10). 消去 を 解除 (F 0) し て , 

| ブロック の 色 と 大 き さ の 指定 へ 戻る 。 

ピーン 5 の 過 き (CT 三 15% い RS= 二 SUM) 

- オ の と き ( 1 ニニ 16). 終 了 の 処理 を する 。 

白 妖 印 還 の と き (1=11-14)、| フ ロッ ク を 恒 く | 
ー ロ ロー[9)】 の と き ①= ニ 1 一 9).|* 印 の 次 の 位置 を 求 
め る | | 画面 内 で ある か の チェ ッ ク を 行う | 

@| キー を X$ に 知る | と ころ に 戻る 。 


較 キー を 知る サブ ルー チン 


この プロ グラ ム の 行 400 一 550 は , 画面 で カー ソ 
ル が わり に ※* 印 (黄色 ) を 点 減 さ せな が ら 移 動き せ 


3 


女 字 番号 28 29 30 31 


ーー 1† 1 


オ は 終り 


表示 1 (つづ き ) 


140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
220 
300 
310 
320 
330 
340 
350 
360 
370 
380 
3920 
400 
410 
420 
430 
440 
450 
460 
470 
480 
420 
っ 00 
っ 10 
っ 20 


Ka 
GOSUB 400: REM X 寺 ニニ キー 
1I=INSTR(INM ま ,X ま ) 

IF 1=0 THEN BEEP:GOTO 140 


2 


! Ne924O US まお 15 が 16 
ER 2 


IF F=1 AND 1<>10 THEN PRINT 


IF 1=10 THEN F=0:GOTO 100 
IF 1=15 THEN F=1:GOTO 140 
IF 1=16 THEN 260 


F = 0 は 普通 の 状態 
F = 1 は 消去 の 状態 を 表わす 


IF I>10 THEN GOSUB 290: GOTO 140 


X= ミ メー1+( 1 エ +2)MOD3:Y=Y-INT((T エ -4)/3) ニニ 
RE あま の 0_ 


GOSUB S60: 
GOTO 140 
ag サル 
CONSOLE 0,25,0,1 
LOCATE 0,22:STOP 
RENM 0 引 和 ゲ テオ が 
FOR K=1 TO L 

LOCATE X,YiCOLOR C 

PRINT 男 : 


IF 1T=11 THEN X=X+1 右 へ 
IF 1T=12 THEN X= ニ Xー1 と 
IF =13 THEN Y=Y-1 半 べ 
IF 1=14 THEN Y=Y+1 本 へ 
GOSUB 560 

NEXT K 

RETURN 

REM === キー / ニュ ウリ ョ ク = ニニ 


GETGA(X,Y)-(X。Y) UM 
COLOR 6iLOCATE X,YkPRINT 
COLOR 7:LOCATE X,Y 
FOR K=1 TO 40 
X も =TNKEY ま $ 
和義 吉 ウ 
NEXT _K 
PUTGA(X,Y)-(X。Y) UiLLOCATE 
FOR K=1 TO 40 
X も =INKEY ま $ ま 
IF X ま まく >"『 
NEXT K 
GO0TO 420 
PUTGA(X,Y)-(X,Y) UM 
RETURN 
RENM チェ リク ニニ ニ 
IF X<0 THEN X=0 
IF X>38 THEN X=38 
IF Y<0 THEN Y=0O 
ES MEN YY=21 
RETURN 
END 


THEN 540 


THEN 540 


キー1-9 に 対す る 
次 の 座標 を 求め る 


画面 の (X.Y) に ある 文字 を W に 


キー が た た か れる まで , ここ で は 
"*※ "を 印字 し て 待つ 
X 。Y 一 一 画面 を も と に 戻す 
キー が た た か れる まで , ここ で は も 
トーーーー 一 と の 文字 を 印字 し て 待つ 
上 の for 文 と 合わ せ て 点 減 効 果 を だ す 


で mmm で を も と で. 涙 
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る た め の サ ブル ー チ ン で す 。 カ ー ソ ル が わり で す 
か ら , すでに 画面 に 表示 され て いる も の を 移動 中 
に 消し て し まっ て は 困り ます 。 そこ で , ※* 印 の と 
ころ に すでに 表示 され て いる 文字 を 読み と っ て 移 
動 する 直前 に も と に 戻し て お く と と も に , 点 減 中 
も そこ に あっ た 文字 を * 印 と 変 互 に 印字 し て わか 
る よう に し た い の で す 。 こ の サブ ルー チン は こう 
いう 仕事 を する と き に いつ も 使え る で し ょ う 。 


行 410 で の 

GET @ A(X, Y) 一 (XX, Y)、W 
は 座標 (X, Y ) に 表示 され て いる 情報 を 色 の 符号 
を 含め て W に 読み と り ま す 。 行 480 と 行 540 の 

PUT @ A(X, Y)ー(X, Y), W 
は , さき に W に 読み と っ た 情報 を 画面 に 再 表示 し 
ます 。 W は 配列 と し て 宣言 し て お きま す 。 こ の 機 
能 に つい て は ここ で し か 使い ませ ん の で , 詳し い 
使い 方 は 省略 し ます 。 


前 回 の 繰り 返し 模様 の プロ グラ ム と 同じ よう に . 


この プロ グラ ム を 編み 込み 模様 の デザ イン に も 使 


えま す 。 家庭 で の 子供 の 遊び に も 楽し ん で 下さ い 。 


① た た か れ た キー を 知る 手法 は 広く 応用 で きる 
で し ょ う 。 カー ソル の 働き も プロ グラ ム に 書け 
ます 。 

② 文字 は 番号 一 一 待 号 , コ ー ド - 
ま 293 


- を 持っ て い 


和 RNN 


①① 次 の プロ グラ ム を 実行 し て みて 下さ い 。 


10 X ま =INKEY ま : IF X ま ="" THEN 10 
20 PRINT X ま も 』 ASC(X ま ) 
30 GOTO 10 


① の 結果 の 例 


に 
28 
に な 
100 
101 
102 
103 
104 
105 
106 
10Z 


^ こ - ビ ー ゴ Q 二 0OQOOOT@ 
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ここ で いろ いろ な キー を た た いて み ま す 。ASC 
は CHRS の 逆 に 文字 XS の 番号 を 与え る 関数 で す 
結果 は 左下 の よう に な る で し ょ う 。 


⑧ LI に 1 か ら 9 の 値 を 与え て , プロ グラ ム P21 


-1 の 行 230 の 様子 を 観察 し て 下さ い 。 


22 


人 @ 放 送 日 3 月 2 日 ( 水 ) 


順番 に 並べ る 


人 @ 再 放送 日 3 月 6 日 (日 ) 


家庭 で 使う 住所 録 や 電話 帳 で も 名 前 の アイ ウエ オ 順 に 並べ る と か 親 威 ・ 

友人 ・ 学 校 関係 な ど で 分 類 し て お く の が 普通 で す 。 情報 は で た ら め に 並べ 
て お いた の で は 使い に くい の で す 。 並べ 換え は マイ コン で も 下手 を する と 
すご く 時 間 の か か る 仕事 の 一 つ で すか ら 覚 えて お く と 便利 な 手法 で す 。 


圏 幹 葉 表 示 の 例 


第 12 回 で 幹 葉 表 示 と いう デー タ 分 布 の 表示 法 を 
扱い まし た が , 幹 葉 表 示 で は 幹 ご と に 葉 を 小さ い 
方 か ら 大 きい 順に 並べ た いも の で す 。 表示 1 と 2 
を 見 て 下さ い 。 表示 1 は デー タ の 入力 順に 作っ た 
幹 葉 表示 で , 表示 2 は 幹 ご と に 葉 を 並べ 換え た も 
の で す 。 こ の よう に デー タ の 分 布 の 様子 を みる と 
き に は , 中 央 値 一 一 デー タ を 大 きい 方 と 小さ い 方 
同数 に 分 ける 真中 の 値 一 一 や , 四 分 位 数 一 一 四 分 
の 一 ずつ に 分 ける 値 一 一 を 出し て お く と 便利 で す 。 


た だ 洗 > 中 央 値 は (37 寺 
1 )/ 2 で 19 番 目 、1 か ら 19 番 目 の 真 ん 中 は 10 番 で 
すか ら 、, 小さ い 方 か ら の 10 番 目 と 大 きい 方 か ら の 10 
番 が 四 分 位 数 と いう わけ で す 。 これ ら の 値 は 表示 
2 か ら す ぐに 読み と れ ま す 。 


圏 算 法 
コン ピュ ー タ で 処理 する 仕事 の 手順 を 算法 一 一 
と いう ご: ど 究 あま 


す 。 算法 と いう と や や 数 学 的 な ひび き が あり ます 
が 、 並べ 換え の 仕事 の 手順 を 考え る と き は 算法 と 


デー タ が 37 個 の と き , 


アル ゴリ ズム , algorithm 


表示 1 
幹 葉 表示 度数 1 
(デー タ 入 力 順 ) 4x18 1 
つ ※16 1 
6※1505 3 
7※128085 5 
8x 155507770577275520 17 
2x 1500S50S0 7 
10%1000 3 


表示 2 幹 葉 表示 ( 幹 ご と に 葉 を 並べ 換え た も の ) 

度数 
4X18 1 
5X 16 1 
6X 1055 3 
7%※102588 5 
8X100022555555777777 17 
2%10000555 7 
10X1000 3 

- 


WO 


累積 (上 下 か ら ) 
1 中 央 値 19 85 
2 四 分 位 数 10|78 90 
5 最小 最大 1|48 100 
10 
17 十 10 十 10=37 
10 件 数 チ エッ 
3 
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か 詩 業 が び う だり で す 。 

デー タ の 並べ 換え の 算法 は 古く か らい ろ い ろ 工 
夫 さ れ て いま す 。 コ ンピュータ で の 実際 的 な 情報 
処理 で は 並べ 換え の 仕事 が し ば し ば 必要 と な り ., 
時 間 も か か る か ら で す 。 こ こ で は , 挿入 法 と 呼ば 
れる 手法 を 説明 し , その プロ グラ ム を 示し て お き 
まし ょ う 。 並べ 換え は , デー タ 数 が 多く な る と ず 
いぶ ん 時 間 が か か る の で , 泡立て 法 と いう 名 前 で 
知ら れ て いる 手法 と 比較 し て み ま す 。 デー タ 数 の 
多い 実務 的 な 仕事 で は 良い プロ グラ ム を 探し て 使 
っ て 下さ い 。 付録 に は quick sort (速い 並べ 換え 
と いう 意味 ) と いう 名 で 知ら れる プロ グラ ム を の せ 
て お きま す 。 sort( ソ ー ト ) と か sorting と いう の は 
英語 で の 並べ 換え の 意味 で す 。 日 本 で は 古く か ら 
分 類 と いう 言葉 が 使わ れ て いま す が , 最近 で は 整 
列 と いう 人 も あり ます 。 


較 挿入 法 


並べ 換え に 使わ れる 用 語 を 少し 説明 し て お きま 
し ょ う 。 簡単 の た め に 7 人 ほど の 学生 の デー タ を 
表 1 に 示し ます 。 こ の よう な デー タタ に 対し て, | 学 
生 番 号 順 に 並べ た り , 中 身 の デ ー タ の 順に 並べ る 
と き が あり ます 。 この と き , 順に 並べ る 項目 を 並 
べ 換 え の 詩 証 と いい ます 。 次 に デー タ を 小さ い 
方 か ら 並 べ る か 大 きい 方 か ら 並べ る か の 両方 が あ 


ビ 


表 1 学生 の 成績 表 
学生 番号 成績 (10 点 評価 ) 


1 8 
2 6 
3 10 
4 和 
5 5 
6 9 
7 8 


り ま す 。 前 者 を 昇順 , 後 者 を 降順 と いい ます 。 
疹 ん で いる デニ ターーー マ イコ ン で は 配列 に 大 れ 
ある と し ます が 一 一 の 一 部 の 続い た デー タ 列 が , 
並べ た い 順 に な っ て いる と き 。, 正 順 と いい , っ 


の 続い た デー タ が 並べ た い 順 に な っ て いな いと き 
逆順 と いう こと に し ます 。 表 1 の デー タ を 昇順 に 
並べ た いと すれ ば 
8 
6 
10 
7 


5 
り 
8 


と いう わけ で す 。 

挿入 法 の 算法 は 図 1 を 見 て ちら うと よく わか る 
で し よう 3 に 刀 さ を 部 列 炎 に 和央 れ て あり 。 デー ンタ 
数 を N と し て , 挿入 法 の 算法 を 書い て お きま し ょ 


| 一 つ 正 順 の 例 


| 一 逆順 の 例 


9 9 9 9 る 9 


8 8 8 8 8 


図 1 挿入 法 の 説明 
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表示 3 挿入 法 サ プル ー チ ン の 使用 例 プロ グラ ム P22-1 


10 REM P22-1 ナラ "カエ 

20 PRINT " テ *ー タ " 

30 READ N 

40 FOR 1=1 TO N 

50 READ X(I):PRINT XC1), アー タ の みみ て 
20 NEXT 1:PRINT 

70 GOSUB 130 ーーーーーーー 並べ 換え の サブ ルー チン へ 
80 PRINT "ナラ A* カ エ " 

90 FOR 1=1 TON 寺 

100 PRINT X(I): ww 

110 NEXT I:PRINT 

120 STOP 

130 REM = ニニ ナラ へ "カエ (ソウ ニュ ウホ ウ ) ニニ ニ 

140 FOR 1I=2 TO N 

150 UM=X(I) 

160 FOR J=1-1 TO 1 STEP -1 

170 IF UM>=X(J) THEN X(J+1 )=M:GOTO 210 


は MM | あの で 似 を 析 入 ず 
200  X(1)=M 逆順 の と き , X(J) を X(J+1) に 下げ る 
210 NEXT 1 | 

220 RETURN 


230 DATA 7 
240 DATA 8,6,10,7,5,2,.8 


に 祭 END 


挿入 法 の 算法 
@i 王 2 か ら N に つい て 

@ ツ =ーXG) W に XG) を と り 出 す 。( こ の と き 
(1),…, XGー1) ま で は 正 順 に な っ て いる 。) 


い 


表示 4 プロ グラ ム P22-1 の 実行 


@j ニ iー1 か ら 1 まで (きざみ 一 1 で ) 
( 正 順に な っ て いる X(1⑪1),…, XGー1) へ の 
W の 挿入 場所 を みつ ける 。) 
W=X(j) な ら 正 順 な の で X(j+1) に W を 田所 要 時 間 の 測定 
| ecxo i へ マイ コン X に は 時 計 が 内 蔵 き れ て いて , 
-W く X(j) な ら 逆 順 な の で XG) を XG 十 1) A$ーTIME$S 
に 下げ る 。 と すれ ば , A$ に 
@W を X(1) に 入れ る 。(W が X1) か ら XG① で い 00S220 35: 
ちば ん 小さ か っ た 。) の よう に 時 刻 が 文字 列 で , 時 分 秒 の 順に 2 ケタ ず 
これ を サブ ルー チン で 書い た の が 表示 3 で す 。 の 65EN2 の 9③ 区 3 つつ で 大 れれ ます 。 
図 1 の デー タ の 実行 例 が 表示 4 で す 。 PRINT TIME$ 


を 実行 し て みれ ば わか る で し ょ う 。 時 間 を 設定 す 
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表示 5 
TIMES$ の 変換 の 
20 S=0 


っ 0 NEXT 1 


un 
4220 ヒ " ョ ウ 
0k 


10 TIME* ま ="01:10:20" 


30 FOR 1 きま 是 H0 7 STEP 3 
40  S=S※60+VAL(MID$(TIME$ ま , 1 ,2) ) 


60 PRINT S? ヒ " ョ 9" 


3 


る に は 

TIME$ 三 "19 : 00 : 00" 
の よう に し て で きま す 。 こ の 設定 を し な けれ ば ぱ , 
電源 を 入れ て か ら の 時 間 に な っ て いま す 。 表示 5 
で 簡単 な 使用 例 を 見 て 下さ い 。 

SS 

for iー] to 7 step 3 

S テ S*60+VAL(MID$S(TIMES. ji 2)) 
next 1 


と いう プロ グラ ム で , 時 間 を 秒 に 換算 で きま す 。 


VAL は カッ コ の 中 の 文字 列 を 数 値 に 直す 関数 で す 。 


TIME$= "01 : 10 : 20" の 場合 に この 手順 を 追っ 
Key の 夫 ま に: ま 5。 
ee の: 層 
MIDS(TIME$, 1 2) で 時 間 の 部 分 "01" が 
と り だ され , VAL ("01" ) の 値 は 1 に な り , 
S は 1 と な り ま す 。 


iー4 の と き 
MID$(TIME$, 4, 2) で , 分 の 部 分 "10" を 
と り 出 し , VAL ( "10" ) の 値 は 10, S の 前 の 
値 1 に 60 を か け ( 分 に 直し ),、 この 10 を 加え て 
S は 70 と な り ま す 。 
ュ テ 7 の と き 
MID$S(TIME$, 7, 2) で 秒 の 部 分 "20" を と 
り 出 し 、 VAL( "20" ) の 値 は 20,S の 前 の 値 70 
に 60 を か け , それ に この 20 を 加え て 4220( 秒 ) 
と な る わけ で す 。 
この TIME$ を 並べ 方 の 所 要 時 間 の 測定 に 使い ま 
す 。 挿入 法 の ほか に も う 一 つ 泡 立て 法 と いわ れる 
算法 を と りあ げ て 比較 を し て み ま し ょ う 。 泡立て 
法 は デー タ の 下 か ら 順 に 隣り 合う 二 つ を 比較 し て 
逆順 な ら 変 換 す る と いう 手順 を 繰り 返し ます 。 下 
か ら 上 まで 1 回 これ を 実行 し た と ころ で 昇順 に 考 
えれ ば 最小 の 値 が 先頭 X( 1 ) に きま す 。 2 回 目 は 


10 46 90 100 B 
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表示 6 プロ グラ ム P22-2 並べ 換え 算法 の 比較 


REM P22-2 ナラ A ベ "カエ サン ホ ? の 9 / ヒ カ ク 
DIM X(100),Y(100) 
READ N 
IF N=0O THEN STOP 
PRINT "n="jN 
FOR 1=1 TO N 
X( 1 )=INT(RND( 1 )*100 ) 
Y(1 )=X(1 ) 
NEXT 1 
REM -ーー ナラ へ ^" カ T 人 ハラ" メ ーーー 
TIME*="00:00:00" 
GOSUB 240 
GOSUB 410 
PRINT "アァ リタ" テ ネ ホウ" 3Sj) ヒ " ョ 9" 
FOR 1=1 TO N 
X( 1 )=Y(1 ) 
NEXT 1 
TIME*$="00:00:00" 
GOSUB 310 
GOSUB 410 
PRINT "ソウ ニュ 9 ホ 9" 5)" ヒョウ 9" 
GOTO 30 
DATA 10,20,50,100,0 
REM = ニニ = アリ タ " テ ホウ ニニ = 
FOR 1=2 TO N-1 


FOR J=N TO 1 STEP -1 
IF X(J-1)>X(J) THEN =X(Jー1 ) :X(Jー1)=X(J):X(J)= い 
NEXT J 
NEXT I 
RETURN 
REM ニニ = ソウ ニュ リウ ホウ ニニ ニ 
FOR 1I=2 TO N 
い =X( 1 ) 


ドド FOREST デー 10 1 SE 3 
IF M>=X(J) THEN X(J+1 )= り :GOTO 320 

X(J+1 )=X( J) 

NEXT J 

X( 1 )= い 
NEXT 1I 
RETURN 
REM ニニ = モ 1ime ま ヲ ヒ " ョ リウ 二 ニニ = 
S=0 
FUR 1=1 TO 7 STEP 3 
S=S※60+VAL(MID ま (TIME ま , 1 。2 ) ) 
NEXT 1 

RETURN 
END 
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下 か ら 始 め て X( 2 ) の と ころ まで 比較 変換 を し て さて , 挿入 法 と 泡立て 法 の 比較 は 乱数 で N 個 の 
ゆき ます 。 泡立て 法 の プロ グラ ム は 表示 6 の プロ デー タ を 配列 X に 作り 出し て 所 要 時 間 を 測り まし 
グラ ム 了 P22-2 の 行 240 か ら 行 300 ま で の サブ ルー チ た 。 N 三 100 で 泡立て 法 は 約 90 秒 挿入 法 は 約 40 秒 
と ので で 大 ちや で いま いす: で し た 。 N を 変え た と き の 測 定 結果 は 図 2 に 示し 


表示 7 プロ グラ ム P22-3 幹 葉 表示 へ の 応用 


必 議 
10 REM P22-3 ナラ へ "カエ ツキ ミキ ハ ヒ ョ ウシ * 

20 DIM F(10),D(10,30 ) 

30 PRINT CHR$(12)』 

40 CONSOLE 15,5,0,1 

っ 0 LOCATE 0,2 

60 FOR 1I=0O TO 10 

70 FI )=0 

80 PRINT _ USING " 村 拉 "315 

20 診 民 NT 

100 NEXT I 

110 LOCATE 0,20:INPUT X 

120 IF X<0 THEN 180 

130 【=INT(X/10 ) :F( 1 )=F( 1 )+1 

140  Z=X-Ix10 

145 DI,。F(1I ) )=Z 

150 LOCATE F(1I )+3, 1+2 

160 PRINT USING " 桁 "jZ 

170 GOTO 110 

180 REM -ー- ナラ へ "カエ ーー 

120 FOR K=0O TO 10 

200 IF F(K)=0 THEN 300 

210 REM -ー- ソウ ニュ 9 ホ 9 ーーー 

220 FOR 1=2 TO FX(K) 

230 い =D(K, 1 ) 

240 FOR J=I-1 TO 1 STEP -1 

250 IF_M>D(K,J) THEN_D(K,J+1 )=M:GOTO 290 
260 D(K,J+1 )=D(K,J) 

ZZ0 NEXT J 

280 DC(K, 1 )= い 

220 。 NEXT I 

300 NEXT K 

う 310 REM --- フタ タ ヒ " ヒョウ シ " ーーー 

320 FOR 1=0 TO 10 

330 IF F(1I)=0 THEN 390 

340 FOR J=1 TO FX1I) | 
350 Z=D( 1 ,J) 

360 LOCATE J+3。 エ +2 
370 PRINT _ USING " 拉 " 3Z 
380 NEXT J 

320 NEXT I 

400 CONSOLE 0,25:LOCATE 0,22:STOP 
410 END 


て あり ます 。N を 大 きく する と どん どん 時 間 が か 
か る よう に な り , 両方 法 と も N に 比例 し て いる こ 
と が わか り ま す 。 挿入 法 は 泡立て 法 の 約 2 倍速 い 
の な 92 


10O / 


秒 95.6 
※ 泡 立て 法 


ーーー ーー 呆 剖 間 
O 

章 

の 

叶 

Ne 


デー タ の 数 


2 並べ 換え の 比較 (機種 X に よる ) 
(10 回 の 平均 。 乱 数 に よっ て 異な る こと が あり ます ) 


脅 幹 葉 表 示 へ の 応用 


挿入 法 に よる 並べ 換え を 幹 葉 表 示 の プロ グラ ム 
P12-1 に 応用 し た 例 を 示し ます 。 表示 7 を 見 て 下 
さい 。 プ ログ ラム P22-3 の 行 30 一 170 は プロ グラ 
ム P12-1 と 行 145 を 除い て 同じ で す 。 行 145 は 葉 に 
相当 する Z の 値 を 幹 ご と に 区 別して 2 次元 配列 D 
(1 F⑪) に 入れ て いま す 。1 は 幹 の 番号 、 F( { ) は 
その 幹 で そこ まで に あっ た 葉 の 数 で す 。 

この 2 次 元 配 列 D を 替 ご と に , すなわち D の 行 
ご と に 昇順 に 並べ 変え る の を 行 190 一 300 で , その 
再 表示 を 行 310 一 390 で や っ て いま す 。 行 310 一 390 
は 行 120 か ら 行 160 を 必要 な と ころ だ け 再 利用 し て 
いま す 。 並べ 換え の 部 分 は プロ グラ ム P22-1 の サ 
ブル ー チ ン で の X(J) の か わり に D(K,J) が 入り , 
K( 幹 ) ご と に 並べ 換え を 反復 し て いる だ け で すか 
ら , 特に 説明 する と ころ は な いで し ょ う 。 


ト 


ーーーーーーー 一 一 + 衣 イシ トー ーー ーー 一 


並べ 換え の 算法 と し て 挿入 法 を と りあ げ ま し た 。 


① 並べ 換え は 算法 を 学ぶ よい 題材 で す 。 プ ログ 
ラム が 短く て も 時 間 の か か る 仕事 で ある こと を 
知っ て 下さ い 。 


② TIME$ で 時 間 を 測定 で きま す 。VAL は 文字 列 
と し て の 数 字 の 列 を 数 値 に 直し ます 。( そ の 逆 に 
数 値 を 文字 列 に 直す に は STR$ と いう 関数 が 使 
えま す 。) 


ーーーーーーーー ゅ = て あま ラー ーー 


① 第 9 回 の パレ ー ト 図 の プロ グラ ム P9- 1 に 手 
を 加え て 配列 を 使う と と も に , 入力 デー タ は 件 
数 の 大 き さ 順 と は 限ら な いと し て , 挿入 法 に よ 
る 並べ 換え を し て か ら , パレ ー ト 図 を 表示 する 


よう に し 交 下 さい 。 


② プロ グラ ム P22-1 の サブ ルー チン で , 行 20 の 
NEXT 1I の 直前 で 配列 X の 値 を 印字 し て 並べ 換 


え の 経 過 を 観察 し て 下さ い 。 
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の つづ 時 さ を そ ろ え る 


人 再 放送 日 3 月 13 日 (日 ) 


ー つ 一 つの 重き に か な り の バラ ツキ の ある 品物 を 袋 詰め する と き に 1 袋 
あたり の 重 さ は で きる だ け 一 定 に そろ えた いと いう 問題 を 考え まし ょ 3 
ビー マン は , 形 も 重き さき も いろ いろ な も の が あっ て , よい 例 に な る で し ょ う 。 
実際 の デー タ と 乱数 を 使っ た 実験 の 結果 を 比較 し た り , 


いろ いろ な 組み 合 


わせ を つぎ つぎ と 量 る 手順 を 考え て み ま し ょ う 。 


圏 実際 に 量 っ て みる 
市 場 か ら ピ ー マ ン を 100 袋 買っ て き て , 袋 あ た り 


の 重 さ と 1 個 ず つの 重 さ を 全部 量 っ て み ま し た 


1 袋 150 グ ラム と いう こと で し た が , 計量 の 結果 


表 1 ピー マン の 重 さ 


袋 あ た り 1 個 あ た り 
平均 160.4 ??^ CS 
最 小 134. 14 
最 大 190. 83 
標準 偽 差 12.4 8.7 

件 数 100 袋 502 個 


表示 1 袋 あ た り の 分 布 


13※14 

13OI668 

14※1000222 
14OI566788889 
15※10001222333334 
15O156778888888889999 
16X10000012222234444 
16O1555666677788 
17%※101222344444 
17OIS66778 

18※13 

18O16689 


、19x 10 ウ 


(5 表示 天 ま ポ つ に 7 
134 グ ラム 、 


き 平均 160.4 グ ラム , 最小 
最大 190 グ ラム と か な り の バラ ツキ が 
ビ キ マ ジル 個 あ た り で は , 平均 31 グ 
ラム , 最小 14 グ ラム , 最大 は 83 グ ラム まで あり ま 
し た 。 い ちば ん 重かっ た 83 グ ラム の ピー マン は は 特 
別 で , 2 番目 に 重い も の は 64 グ ラム で す 。 袋 あ た 
り の 重 さ の 分 布 の 様子 は 表示 1 に 幹 葉 表示 で , 1 
個 あ た り の 重 さ の 分 布 は 図 1 に ヒス ト グ ラ ム で 示 
し て あり ます 。 こ の 分 布 に ピー マン 分 布 と いう 名 
前 を 冗談 に つけ て や り ま し た 。 図 1 を 見 る と , あ 
まり 小さ い ピ ー マ ン は 袋 に いれ な いよ うに し て い 
た り , 大 きい 方 は 別に クラ ス 分 けし て 袋 詰め し て 
いる こと が ある 程度 うか が われ ます 。 


一 袋 詰 め の 実験 


ここ で は 次 の 3 と お り の 場合 を 考え て み ま し ょ 
づ 5。 
( イ ) 1 袋 あ た り 5 個 と 固定 し て “手当 た り 
次 第 に ” 詰め て みる 。 
( ロ )。 了 ユ 袋 150 グラ ム 以 上 と いう 条件 で “手当 
た り 次 第 に ′ 詰め て みる 
( ハ ) 8 個 の ピー マン を “手当 た り 次 第 に "取り 
だ し て , 150 グ ラム 以上 で いち ば ん 差 の 少な い 
組み 合わ せ を 作っ て 袋 に 詰め る 。 余 っ た ピー 


† この 実験 は 大 学 で の 統計 と プロ グラ ミン グ の 実習 と し て, 


使っ て 行わ れ ま し た 。 使用 後 の ピ ー 
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次 回 に 紹介 する マイ コン に 接続 し た “はかり "を 


ン は 学生 食堂 に 寄付 し た の で 翌日 の 机 立 に 生か され まし た 。 


グラ ム 
14-5 軒 1 
16-7 還 還 較 6 
18-② 王 還 還 間 間 隊 開 1 つ 
20 - 1 王 還 間 間 較 間 間 間 間 了 較 2 
コノ ーー 彰人 
4 「」 EE 
ノン 還 了 了 
コト " 還 陣 間 了 
30 - 1 還 還 間 間 間 間 間 人 
EE 天 了 >oowowWwWwkbkbkbkbhbhbhbhkxsws 
34 - 5 王 還 間 間 間 間 間 間 間 間 了 間 間 間 隊 間 つづ 
36-7 王 還 間 間 間 間 間 間 間 間 較 較 フウ 
38- の 王 還 還 間 間 昌 間 間 間 較 2 
40- 1 王 還 間 間 間 間 間 間 間 間 間 間 間 間 間 蘭 2 ウ 
42-3 王 還 間 昌 間 症 本 昌 15 
44-5 還 還 較 詳 間 14 
46-7 還 還 還 是 / 
48-⑦ 還 呈 較 / 
50-1 加計 4 
52-3 蘭 較 3 
54-5 還 軒 3 
56-7 軒 1 
58-9 面 1 
60-1 画 1 
ら も るー 8 
64-S 圧 1 
ら @ エ と だ 、: 間 
69- タ 、 
4 が 寺本 
人 、) 
提 の 9 邊 
co 
人 
に SN 
82-3 看 1 ピー マン の 重 さ の 分 布 
電 Rs ーーー- JNN 本 還 ナ 、 征 線 才 革 ホ う 
マン は 次 の 袋 詰め の 候補 に まわ す .。 xーu※\8 一 18 [xint(x 十 0.5) と まる め る ] 


の SS 


当たり 次 第 に "と いう の は 。 次 の よ 
うに 乱数 を 使っ た 実験 で 行い ます 。 
乱数 rnd を 使っ て , 


と 
マコ ジン の 間 の 乱数 で , 


その 乱数 12 個 の 和 を の 間 で 平均 は 6 で す 。 


変換 し た x を 一 つの 重き と し ます . 
の それ を 12 個 加え た u は 0 か ら 12 


rnd は 0 と 


u に 8 を か ける と 平均 は 48 


u デ 0 に な り ま すか ら , 18 を 引く と, 実際 に 測定 し た ピ 
for i 三 1 to 12 ー マ ン の 平均 31 グ ラム に 近く な り ま す 。 し か も 分 


u 三 u 十 rnd (1) 
next 1 


と いう プロ グラ ム で u に 作り 


布 の 様子 も 図 2 に 示す よう に だ いた い 合 っ て いま 
す 。 この 図 2 は 付録 の プロ グラ ム P23-3(188 頁 ) 
を 使っ て 作り まし た 。 
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ヘイ キン = 29.316 ヒョウ シ " ュ ン ヘン サ = 8。18279 


ショ キチ = 830309 


表示 2 袋 あ た り の 分 布 ( 1 袋 あ た り 5 個 ) 


図 2 
ピー マン の 重 さ 用 乱数 


6 度数 秋 積 (上 下 か ら ) 
10X※12 1 1 
11%※1001235 6 7 
12X101223445666678 14 21 
13%X1001234456678999 15 36 
14X|I1111255555666677778999 22 22 二 36+42=100 ぴ 
15X101222333455667889 17 42 
16※1022334568899 12 25 せ 100 
1 7%※102223478 8 13 | 146.5 
18%X10149 4 5 四 分 位 数 132.5 159.5 
19※ 19 1 1 最小 最大 |102 199 
20※ | 計 100 


( イ ) 1 袋 あ た な り 5 個 

1 袋 あ た り 5 個 に 固定 し て , 手 当たり 次 第 に 取り 
だ し た ピー マン で 100 袋 作っ て み ま し ょ う 。 結 果 を 
表示 2 の 幹 葉 表示 に し て み ま し た 。 平均 は 150 グ 
ラム 近く に な っ て いま す が , バラ ツ キ が 大 きい で 
すね 。 
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( 口 ) 1 袋 150 プ ラム 以上 

1 袋 が 150 グ ラム より あま り 少 な いと 消費 者 か ら 
埋 情 が で る で し ょ う 。 1 袋 150 グラ ム を 越え る ま 
で 乱数 を 使っ て いっ て 袋 詰め する 実験 の 結果 が 表 
示 3 の 幹 葉 表示 で す 。170 グ ラム 以上 も ある 袋 が 34 
2 に な り ま し た 。 使用 し た 乱数 、 つ まり ピー マン 


間 


SO 表示 3 
度数 袋 あ た り の 分 布 


15X10002222333344 13 (150 グ ラム 以上 に 制限 ) 
15O155555556666666777888899999 26 
16%※IO00111122244 11 
16O15667 ア 7 ア 7789999999 16 
17%※10111223344 10 
17O155566667788899 14 
18X 1013344 6 
18O1678 3 
19※ | 0 
19O15 1 


グラ : ム 


1 | 


151 王 較 間 間 間 間 間 間 間 1 
152 回 還 較 5 

153 画 1 

154 画 1 

Pe 

156 画 1 


は 100 袋 で 566 個 に な り ま し た 。 これ で は 生産 者 が 
損 を し ます ね 。 
( ハ ) 1 回 に 8 個 の ビー マン を 取り だ し て 、150 グ 

ラム 以上 で 最小 の も の を 探す 

この 手順 は 8 個 の うち の すべ て の 組み 合わ せ を 
調べ て いる と 時 間 が か か り ま す 。 し か し 可能 性 と 
し て 1 袋 あ た り の 重 さ の バラ ツキ を どこ まで 減ら 
せる か の 興味 が あり ます 。 結果 は 和 驚 く ほ ど , 1 袋 
の 重 さ が 一 定 に そろ い , 全体 の ピー マン の 数 も 516 
個 で , 5 個 ず つ 詰 め て 100 袋 作っ た と き と 変 わり ま 
せん 。 図 3 を 見 て 下さ い 。 なお, これ ら の 実験 に 
用 いた プロ グラ ム P23-3 一 6 は 付録 に の せ て お き 
ます 。 


較 四 つの 物 の あら ゆる 組み 合わ せ を 量 る 


品物 一 つ ず つの 重き , 二 つ の 組み 合わ せ ご と の 
重 さ , 三 つ の 組み 合わ せ ご と の 重 さ 、 四 つ 全部 の 
重き を 量 っ て みる 問題 を 考え て み ま し ょ う 。 


図 3 
8 個 の 中 か ら 最 良 の 組み 合 
わせ を 選ん だ と き の 袋 あ た 
、 り の 分 布 
品物 が 促 ば か り の 上 に 乗っ て いれ ば 1 , 乗っ て 
いな けれ ば 0 と する と , 四 つ の 物 の あら ゆる 組み 
合わ せ は 表 2 の よう に も 表せ ます 。 表 2 は 、 実 は 
10 進 数 と 2 進数 の 対応 表 に な っ て いま す 。 


表 2 10 進 一 2 進 対応 表 


10 進 数 2 進数 
0 0000 
1 0 001 
2 0010 
き 0 0 1 1 
4 0100 
5 Oo 
6 0110 
7 0 1 1 1 
8 1000 
9 1001 
10 1010 
11 OS は 
12 1100 
13 1 10 1 
14 0 
15 HH 


147 


この 2 進数 の 順に 重き を 量 っ て ゆく と する と ど 
うな る で し ょ う 。 品物 を ①, ②, ③, ④ と し て , 
2 進数 の 右 か ら 対 応 さ せま す と 。, 

0001 ① を の せ て , ① を 量 る 
0010 を の せ て ,① を お ろ し ,② を 量 る 
0011 ① を の せ て , ①② を 量 る 
0100 を の せ て ,① と ② を ぉ ろ し ③ を 量 る 


0101 ① を の せ て ., ①+③ を 量 る 
0110 を の せ て , ① を お ろ し ②+③ を 量 る 
0111 ① を の せ て ., ①+⑨②+③ を 量 る 


る 
と いう 具合 で す 。 こ れ だ と は か り に の せ た り どけ 
た り の 操作 が 多く な り ま す 。 

これ に 対し て 次 の よう に する と 1 回 に は 一 つ を 
の せる か どけ る か で 量 れ ます 。 


0001 ① を の せ て ① を 量 る 

0011 を の せ て ①+⑨② を 量 る 
0010 ① を お ろ し て を 量 る 

0110 ③ を の せ て ⑧②+③ を 量 る 
0111 ① を の せ て ①+⑨②⑧+③ を 量 る 
0101 を お ろ し  ①+⑨⑧③ を 量 る 
0100 ① を お る ろ ③ を 量 る 

1100 ④① を の せ て ③④ を 量 る 


以下 は 表 3 の パタ ー ン の よう に 量 っ て ゆき ます 。 


表 3 
2 進数 量り 方 の パタ ー ン 
0000 0000 
0001 0 0 0 1 
0010 0011 
OKO2t-1 0010 
0100 0110 
0101 (前: 拓 
0110 0101 
む よ せ -】1 0100 
1000 1 1 9 
1 0 0 1 よせ すき 
1010 StATEE 
1 ey ま 。3 
1100 1010 
03 1. ひ うす 
まま L ⑥. 半 
SINHE よ ま 1000 
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この パタ ー ン と 2 進数 は 実は 簡単 な 関係 が あり ま 
す 。 2 進数 の 4 けた を 

b。 b。 b。 b 
パタ ー ン の 4 けた を 


D4 Ds Ds Di 

どる だ 
D 三 b。 
Ds 三 b。 十 b。 も し これ が 2 な ら 0 と する 
Ds ba 十 b。 も し これ が 2 な ら O と する 
bi 三 bz 十 b」。 も し これ が 2 な ら 0 と する 


と いう 具合 で す 。 


圏 バ ター ン を 作る プロ グラ ム 


この パタ ー ン を マイ コン で 作っ て み ま し ょ う 。 
まず , 2 進数 を 作っ て 。 それ か ら パ ター ン に 変換 
する ご と に も ます 
2 進数 の 作り 亡 

表 3 を よく 見 れ ば 次 の こと が わか り ま す 。 

@ 2 進数 の 右 か ら 見 て 以下 を つづ ける 

1 な らら ゼロ に 変え る 

1 
この 算法 で 順に 2 進数 を 作っ て ゆけ ます 。 1 を 足 
し て いっ て も よい の で す が , 足し 算 を し な いで 済 
む の が 上 の 算法 の お も し ろ い と ころ で す 。 こ の プ 


2 進数 と 量り 方 の パタ ー ン の プロ グラ ム P23-1 


REM P23-1 八 力 リカ タ ノ 八 "ター ン 
DIM B(10),P(10) 
INPUT _N - で N は ピッ ト 数 
GOSUB 140 
FOR _K=1 TO 2^N-1 ーー テーrh oN は 2 の 乗 
FOR 1=1 TO N 
IF BI)=0 THEN BI)=1:GOTO 100 
B( 1 )=0 
NEXT 1 


P( 1 )=1-P( 1 ) た 
50SUB 140 パタ ー ン 第 『 け た を 0 な ら 1., 


右 の ビッ ト (B(1)) か ら 見 て 0 が あれ ば 
1 に し て 行 100 へ 。 
は じ め か ら 1 が 続く 間 は 0 に 変え る 。 


120 NEXT K 1 な ら 0 に 変え る 


STOP 

REM ニニ = ニニ イン シ " ニニ ニ 
FOR 1I=N TO 1 STEP -1 
PRINT BI)5 

NEXT IiPRINT ":「: 

FOR 1I=N TO 1 STEP -1 
PRINT P(1I)} 

NEXT Ii:PRINT 

RETURN 

END 


間 


すべ て の 組み 合わ せ を 量 る プロ グラ ム P23-2 


REM P23-2 ス A" テ ノ クミ アワ 9 セ ヲ カル 
DIM B(10),P(10),X(4) 
INPUT _N 


FOR IT=1 TO N 
INPUT X(1) ト N 個 の 重 さ の 入力 
NEXT I 
S=0 
60SUB 140 
FOR K=1 TO 2^N-1 
FOR 1=1 TO N 
IF B(I)=0 THEN BI)=1:GOTO 100 
B( 1 )=0 
NEXT 1I 
P( 1 )=1-P( 1 ) は か り に の せる か お ろ す 番号 
IF P(I)=1 THEN S=S+X( 1 ) ーーーーーーー 一 は か り に の せる 
IF PX1I)=O THEN S=S-X( 1 ) = ニーーーーーーー- は か りか ら お ろ す 
GO0SUB 140 
NEXT _K 
STOP 
REM ニニ = ニニ イン シ '" ニニ ニ 
FOR 1I=N TO 1 STEP -1 
PRINT BI)} 
NEXT Ii:PRINT ":「 ぉ 
FOUR 1I=N TO 1 STEP -1 
PRINT PX(1): 
NEXT TI:PRINT ":”:S< 一 一 ーーーーーーーーー 一 一 重 さ を 印 字 
RETURN 
END 


へ は べ キ 乗 


ン ノ 
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ログ ラム は , 2 進数 の N け た を 配列 B に 入れ て 
B(N) B(N 一 1) … B(2) B(1) と する と 

for i テ 1 to n 

せ B() 三 0 then BG)=1 : goto 100 

BG) テ 0 

next i 
Ih100| 以下 の プロ グラ ム 
と な り , これ で , 次 の 2 進数 が 作れ ます 。 な お 
0 と 1 の 1 ケタ を ビッ ト (bit) と いい ます 。 
重き の 量り 順 の パタ ー ン は , その 前 後 で 1 ビッ 
ト だ けが 変わ り ま す が . そ の ビッ ト の 位置 は 対応 す 
る 2 進数 で 上 の 算法 で 最後 に 変化 し た の と 同じ 位 
置 で す 。 その 位置 を 1 と する と , 

時) デ 1 そ P( 1) 
と すれ ば よい の で す 。 
以上 の 算法 を 使っ た プロ グラ ム P23-1] を 表示 4 
に 示し ます 。 パタ ー ン の 印字 部 分 は サブ ルーチン 
に な っ て いま す 。 ま た, 行 50 の for 文 の 終り の 値 
2 ^ へ N 一 1 の ^ へ は 2 の べ キ 乗 (2 を N 回 か ける ) 
を と る 演算 の 記号 で す 。 


圏 組み 合わ せ ご と の 重 さ を 量 る プロ グラ ム 


上 の プロ グラ ム P23-1 を 利用 し て , 配列 X に 入 
っ て いる 重き に つい て , す べ て の 組み 合わ せ の 重 さ 
( 和 ) を 手順 に 量 っ て み ま し ょ う 。 そ の プロ グラ ム 
が P23-2 で す 。 表 示 5 の 中 に 説明 を 書き 込ん だ と こ 
ろだ けが P23-1 と 変え た と ころ で す 。 実行 し た 例 


を 表示 6 に 示し ます 。N= テ 4 と し て X(1) か ら X(4) 
に 1, 2.4,8 を 入力 し まし た 。 S と し て 0 一 15 の 数 
が 出 て きま す 。 これ は 重 さ を 量 る 手順 の パタ ー ン 
が 2 進 法 の 列 を どう 入れ 換え て いる か 示す こと に 
9206 お 


表示 6 プロ グラ ム P23-2 の 実行 例 


傘 8 
だ Un 

② 4 オ ェ ーーN 

? 1 < 一 X(1) 

4 X(2) 

? 4 X(3) ! パタ ー ン 

2 8 3 量り 方 の パタ 
9902INSREESZGOIaOSSS6 は 2 
6 生き 6 BBal 6 生 箇 時 人 介 9 良 9990 SW SN5S| 
RSSNSHANONCSSSOS3 UE 8 表 21ee0S 
Yo に 折 10 8 RM 0 52 0823 
(6 ER 8 謗 0 衣 NDNB M 0 人 前 4 
(0 計 誠人 2 3 人 yh ARE 
ON いり 00KYE 65 
し は 1 衣 : RSyxB 和 H RDGS 計り 21 
0 当り td 0 計時 8 210 1 を 5 の 
BON 0 光生 JTS 、 
CS 0 RIE ES9H 0 だ to 時 94 ey MR RA の 凡 
Ua 0 いき 了 2 0 1 
6 1100 BSr22902 0 陣 KCi 了 eT 8 BB 
AE Stol に CN 科 け 3Pa 因 人 い 3 本 : に EY 
由 は 0 人 和 0SEIUISeaPOYSp(dE:ID6TTUS4 St の 
eKSINKMOt29EI 006 SYO 
Break in 130 


「s 
KN 


し 


ーーーーーーーーー ま ポイ シト ーーー ーー 


重き を 量 っ て 袋 詰め を 行う 問題 に , 0 と 1 の パ 
ター ン を 利用 する こと を 考え まし た 。 
① 2 進 法 は コン ピュ ー タ で よく 使わ れ ま す 。 記 
憶 装置 の 中 は ビッ ト の か た まり の よう な も の で 


す 。 また , 2 進 法 や 重き を 量 る 手順 の 0 と 1 で 
表し た パタ ー ン (これ を 巡回 2 進数 と いう こと 
が あり ます ) を 処理 する 算法 は お も し ろ い も の 
Ke 5 た 


に トー ーー トーm35 和 ーー 


① 乱数 実験 の プロ グラ ム P23-3 一 6 は 付録 に あ 
り ま す 。 これ を 使っ て , 実験 を し て みて 下さ い 。 
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② プロ グラ ム P23-1 で n に 5 を 入力 し て ,。 パタ 


ー ン の 様子 を 見 て で 下さ い 。 


は か り を つなぐ 


@ 放 送 日 3 月 16 日 ( 水 ) 欠 再 放送 日 3 月 20 日 (日 ) 
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前 回 は ピー マン の 重 さ を 量 っ て その バラ ツキ を 見 た り , 重 さ を 量 る 手順 
を 考え まし た 。 は か り を マイ コン に 接続 し て , 自動 的 に デー タ を マイ コン 
< 覚え させ て や れ ば 便利 で すね 。 今 回 は , は か り の よう な 外 の 世界 か ら の 


較 情 報 の 出入 り ロ > 


マイ コン に は いろ いろ な 外部 の 機械 を 接続 し て 
その 機械 を 制御 する こと が で きま す 。 その た め の 
マイ コン と 外 の 世界 と の 間 の 情報 の 出入 り 口 が あ 
り . それ は ポー ト (port) と 呼ば れ て いま す 。 ボー 
ト は 港 。 エア ポー ト (airport) な ら 空 港 と いう 意味 
で すね 。 マ イコ ン に は ポー ト 以 外 か ら 宙 出 入国 は 
で きま せん 。 


信号 を どう や っ て マイ コン が 受け と る か , その 基本 的 な こと を 学び ます 。 


EPS 介 AD 


較 重 さ の 情報 


小さ な ば ね ば か り で 測定 し た 重 さ の 情報 を マイ 
コン に 読み と ら せ て み ま し ょ う 。 私 達 の 工夫 し た 
装置 は 図 1 の よう に な っ て いま す 。 

マイ コン で は ,。 表示 1 の プロ グラ ム P24-1 を 実 
行き させ て お き , 量り た いも の を ば ね ば か り の 中 に 
の せま す 。 重 き の デ ー タ は 第 1 の 接続 部 (nterface, 


ィ ン タ フェ イス ) を 通し て 信号 を マイ コン に 送っ 


図 1 は か り の 構成 
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~ 還 
JREM PP ジ イード 7 に 前 際 K エ エエ ウ リ ョ クワ 


20 P=0 


40 P=INP(178) 
45 P=P AND &H1 


60 M=INP( 176) 


20 END 


30 PRINT "スイ ゅ チ ヲ オシ テク タ " サ イ " 


っ 0 IF P=O THEN 40 


70 X=((MU AND &HFO )/&H10 )x10+(U AND &HF ) 
肌 衝 。 由 R ま NT メッ ドク "チラ 


300 


トン 


て きま す 。 ば ね が 落ち つい た と ころ で , 第 2 の 接 
続 部 の 先 に ある 送信 スイ ッ チ を 押し て や り ま す と . 
マイ コン は その ボー ト か ら 重 さき さ の デー タ を 読み と 
る こと が で きま す 。 マ イコ ン か ら 見 れ ば 情報 を 入 
の NE まさ お 

重 さ の デー タ は 2 進 法 の 4 ケタ (ビッ ト ) を 2 組 


並べ て 


た ae Al 


と いう 形 で 送ら れ て きま す 。 上 の 例 で は 10 進 法 で 
43 グ ラム を 表し , 10 進 法 の 数 値 が 装置 の 表示 部 に 
も 表示 され る 仕 か が け に な っ て いま す 。 

普通 、 2 進 法 8 ビッ ト を 1 バイト (byte) と いい , 
ポー ト で は 1 バイ ト 単 位 の 情報 を 基本 と し て 出し 
入れ し て いま す !。 皆さん の 中 に は 16 進 数 を 知っ て 
いる 人 も いる こと で し ょ う 。 表 1 に 10 進 - 2 進 -16 
進 法 の 対応 を 示し て お きま す 。 2 進 法 の 長い ビッ 
ト の 列 は 人 間 に は 不便 で すか ら 、 4 ビッ ト ず つ に 
切っ て 読み 書き する の が 16 進 法 で す 。 マ イコ ン の 
内 部 で の 動作 や 外界 と の 信号 の や り と り を し よう 
と いう と き に は 16 進 数 を 覚え て お く と 便利 で す 。 

この 装置 で は その 作成 上 の 便利 さか ら 。 重 さ の 
デー タ を 8 ビッ ト 全 体 で 2 進 法 の デー タ と し て 表 


現 せ ず に , 4 ビッ ト ず つ に 区 切っ て , それ ぞ れ を 
10 進 数 に 変換 すれ ば よい よう に し て あり ます 。 こ 
の よう な 数 の 表現 を 2 進化 10 進 法 と 呼ぶ こと が あ 
り ま す 。 こ の と き は 表 1 で 10 進 法 の 9 まで を 1 け 
た ずつ 使え ば よい の で す 。 


圏 ボ ー ト か ら の 入力 


機種 々 で は ,、 ポー ト か ら の 入力 を 受け と る た め 
選 繊 。 


| 


マイ コン に 接続 し た は か り 


† ここ で は 機種 X に 拡 旧 装 置 を つけ て . そ こ に ある ポー ト を 使っ て いま す 。 以 下 で 使う 176 番 の ポー ト は 8 ビ ピット 


の 入力 ポー ト で す が , 178 番 は 4 ビッ ト の 入力 ポー ト で す 。 
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表 1 10 進 一 2 進一 16 進 法 の 対応 


10 進 法 2 進 法 16 進 法 
0 0 0 0 0 0 
ふい 
1 0 0 0 1 出 
2 0 0 1 0 2 
3 0G30 沿 3 
4 ON に OO 4 
5 ONSSOE は 5 
6 HHHO 6 
7 で 玉 sk 江 7 
8 1 0 0 0 8 
9 SO 9 
10 EKO7AR30 A 
11 OS B 
12 WAS C 
13 REOE2H D 
14 HK E 
15 1 F 


INP (①) 
と いう 関数 を 使い ます 。 p は ポー ト の 番号 で 。 プ 
ログ ラム P24-1 の 行 40 と 60 に ある よう に , 重 さ の 
デー タ 用 の 第 1 の 接続 部 に 対し て は 176, 送信 スイ 
ッ チ 用 の 第 2 の 接続 部 に 対し て は 178 を 使っ て い 
まさ MA ば: 

60 W=INP(176) 
の よう に let 文 の 右辺 に INP を 使い ます 。INP は 
input (入力 ) と いう 言葉 の 頭 の 3 文字 を と っ た も 
(の) の 3 の 

送信 スイ ッ チ は 

40 P=INP(178) 

50 IF P=0 THEN 40 
で た え ず 監視 し . それ が 押さ れる や 否や 行 50 の 次 
か ら を 実行 し ます 。 こ の 調子 は INKEY$ を 使っ て 
キー ボー ド か ら た た か れ た キー を 知る と き と 同 じ 
で すね 。 

その あと 

60 W=INP(176) 
は , 重 さ の デー タ の 入力 で す 。 (機種 メ で は 拡張 
ユニ ッ ト と いわ れる 装置 が あっ て , 176 と 178 番 の 


入力 用 ポー ト は その 拡張 ユニ ッ ト に あり ます 。 ま 
た , 178 番 の ポー ト は 4 ビッ ト の 信号 を 入力 する 
小 C005 が の US ま : ボ け 


較 重 さ の デー タ の 変換 


すでに お 話し た よう に 重き の デー タ は 2 進化 10 
進 法 の 形式 を と っ て いま すか ら , 後 の 処 理 の た め 
に 人 間 か ら 見 れ ば 10 進 数 に 。 マイ コン の 中 で は 普 
通 の 2 進数 に 変換 し て や る 必要 が あり ます 。 その 
た め に は , 変数 W に 受け と っ て ある 8 ビッ ト 分 の 
情報 を を 4 ビット ずつ に 分 け ま す 。 そ れ を W1 と WO 
と すれ ば 

メー テ W1*10 十 WO 
と いう 文 で X に 普通 の 表現 の 数 が 代入 され ます 。 
だ ちさ 


0 1 0 0|0 0 1 1|=W の 8 ビッ ト の 部 分 


4 3 
W1 WO0 


4X10 十 3 つ 43 
と いう 具合 で す 。 マ イコ ン の 中 で は こう いう 計算 
も 2 進 法 で 行わ れ て いま す 。 

き G。。 W の ビッ トバ パタ ー ン を 4 ピッ ト ず の め 分 は け 
て W1 と W0 に 入れ る に は どう する の で し ょ う 。 
この た め に は 

W1= (W AND &HEF0) プ &H10 

W0= W AND &HF 
と いう 命令 を 使い ます 。&H が つく 定数 は 16 進 数 
を 表し , AND は 論理 演算 子 と 呼ば れる も の の 一 
PJ 

&HF0 は, 表 1 か ら 16 進 法 の F と 0 を ひい て ,2 

進 法 に な お す と 
(=&HFO) 
Ce に Nr 38 人 KoX い law 
(=WH) 
で , 必 HOF と 書い た も の と 同じ で す 。 

答 理 論 算 子 AND は 二 つ の ビッ ト パ タ ー ン を ビ 

ッ ト ご と に つき 合わ せ て 両 詞 が 1 の と き に 1 を , 
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その 他 の と き は 0 の ビッ ト を 与え る も の で す 。 
た と えば 
W AND &HF0 
で は 


店 vepoiilw 


と な り ま す 。&HF0 は 左 の 4 ビッ ト が 1, 右 の 4 
ビッ ト が 0 で すか ら , これ と AND を と る と 相手 は 
な ん で あっ て も 左 4 ビッ ト は 相手 の も の が その ま 
ま 残 り , 右 4 ビット は すべ て ゼロ に な る と いう わ 
け で す 。 W に 入れ る まえ に この 結果 を &H10 で 割 
っ て いる の は 4 ビット 分 右 へ ずら し て 普通 の 4 ビ 
ッ ト の 2 進数 に し て いる わけ で す 。 10 進 数 で 2 ケ 
タ の も の を 10 で われ ば 左 の 第 1 ケタ が 求まる よう 
に (整数 の 計算 で ), 層 H10 と いう 16 進 数 の 10 で 割 
れ ば , 16 進 数 の 第 2 ケタ 、 つ まり 上 の 図 の 左 の 4 
ビッ ト が 求まる の で す 。 W0 を 求め る 右辺 の 式 は 
も うお わか り で し ょ う 。W の 右 の 4 ビッ ト が 求 ま 
り ま 。 す 。 


田 装 置 の 工夫 


装置 に 関し て 簡単 に 説明 し て お きま し ょ う 。 こ 
の 装置 は 10 個 余り の IC (集積 回 路 ) を 中 心 に 組 
み 立 て られ て いま す 。 こ の よう な 工作 に は 一 昔 前 
な ら ト ラン ジス タ を 沢山 使わ な けれ ば な ら な か っ 
た の に , 最近 は ずい ぶん と 楽に な っ て きま し た 。 

と ころ で , 装置 の 概略 の 構成 は 図 1 に 示し た よ 
うに , 穴 あ き フィ ルム , 穴 の 検出 部 ,. その 穴 の 計 
数 部 。 重 さ の デー タ の 表示 部 , マイ コン と の 接続 
部 , 送信 スイ ッ チ と その 接続 部 か ら 成り ます 。 

ば ね ば か り は 重 さ に 応じ て 伸縮 し , ば ね の 伸び 
に 応じ た 目盛 を ふっ て お け ば , 人 間 が 読み 取れ ま 
す 。 こ こ で は , ば ね の 伸び 縮み を 次 の よう な 方 法 
で 検出 し て , その 結果 を 電気 信号 に 変え て 送信 し 
て いる の で す 。 ば ね と いっ し ょ に 動く フィ ルム が 
と りつ けら れ て いて , フィ ルム に は 図 2 の よう に 
規則 正しく 2 列 の 究 が 空け られ て いま す 。 検出 部 
は その 究 の 通過 を 光 で 検出 し ます 。 図 2 に 示し て 
ある よう に , 穴 を 光 が 通 過す れ ば 1 , そう で な け 
れ ば の ひと ます と 二 つ の 大 に いて 。 06: Gi: 
11、 10 の 4 と お り が 生じ る よう に 2 列 の 究 を ずら 
し て ある の で す 。 2 進 法 の よう に 00, 01, 10, 11 
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の と ころ が 空い て いる 


そこ を 光 が 通 過 し て いれ ば 1 
そう で な けれ ば 0 と する 。 


に コ s < に =s < に ココ s < 


図 2 フィ ルム で の 穴 の あけ 方 


の 順 で な いこ と に 注意 し て 下さ い 。 隣 ど お し で は 
1 ビッ ト だ けが か わる 方 式 に な っ て いる の で す 
(前 回 の 重 さ を 量 る 手順 の パタ ー ン も そう で し 
た )。 この よう に する と , 01 の 状態 か ら 10 に 移 れ 
ば 重 さ が 増し , 01 か ら 00 へ 移 れ ば 重き が 減る と い 
う よ う に , ば ね に 上 下 に 応じ た 両方 向 の 穴 の 動き 
が 計数 (カウ ント ) で きま す 。 容 が 1 列 だ け で は 
一 方 の 方 向 し か わか ら な い の で す 。 

計数 部 で は 上 に 述べ た 原理 で 00, 01。 11, 10 の 
情報 か ら 上 下方 向 の 動き を 数 えま す 。 そ の と き , 


表示 部 を 簡単 に する た め に 2 進化 10 進 法 で 計数 を 
行う よう に , それ に 適し た 計数 用 の IC を 使っ て 
いま す 。 計 数 部 と 表示 部 は 一 応 3 ケタ の 10 進 数 を 
計数 し て 表示 で きる よう に し て あり ます が , ここ 
で は 2 ケタ 分 し か 使っ て いま せん 。 

接続 部 で は マイ コン で きめ られ た 方 式 で 信号 を 
送る よう に し て いま す 。 


プロ グラ ム ビ P 24-1 


すでに 部 分 的 に は 説明 し て あり ます が , 行 ご と 
に 説明 を 追加 し て お きま し ょ う 。 

行 30 は 送信 スイ ッ チ か ら の 入力 を 受け る 変数 P 
を ゼロ に し て お きま す 。 論 数 や 配列 は run 指令 の 
直後 に ゼロ に され ます の で 普通 は 必要 あり ませ ん 。 
この 種 の プロ グラ ム は じ ば し ば ぱ ば サ プ ブルー チン と し 
て 使う の で , 念 の た め ゼ ロ に し て お いた ほう が よ 
UIG9 た : 虹 9 

行 30 は 送信 スイ ッ チ が 押さ れる の を 待つ 状態 に 
な る こと を 表示 する た めで す 。 

行 40 か ら 50 は , 送信 スイ ッ チ の 状態 を ポー ト 178 
に 入力 し て P に 受け と る や り と り で す 。 

行 606 は 重 さ の デー タ を ポー ト 176 か ら 入 力 し て 
W に 入れ ます 。 

行 70 は W ( 2 進化 10 進 法 の デー タ ) を 変換 し て 
文 に 入れ ます 。 

行 80 は X の 値 を 表示 し て いま す 。 
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電子 で お し ゃ べり 


候 放 送 日 3 月 23 日 ( 水 ) 


念 再 放送 日 3 月 27 日 (日 ) 


自動 販売 機 で 物 を 買っ た ら 誰 も いな い の に 「 あ り が と う ご ざ いま し た 」 
と 声 が 出 て きた りす る よう に な っ て いま す 。 マ イコ ン か ら 信 号 を 出力 し て 
声 を 出さ せ た り , 音声 を 合成 する 仕組 の 基本 を と りあ げ ま し ょ う 。 


圏 声 を 出す 


前 回 は 。 ば ね ば か り の ば ね の 伸縮 を 検出 し て 目 
盛 の 動き の 情報 を マイ コン に 送り 。 重 さ の デー タ 
を , キー ボー ド か ら 入 力 し な いで も , 自動 的 に と 
れる 仕組 み を 考え まし た 。 その 重 さ を 画面 に 表示 す 
907 お SING WCwS2270 ロ 5 が ン 


グラ バム) デス 」 な ど と いわ せ た だ たき 楽 短い で し じょう 。 


圏 音 声 を 合成 する 


録音 テー プ な ど に 文章 を 録 埋 し て お いて , 必要 
な と ころ を 取り 出し て くる の は 大 変 で す 。 最 近 使 
われ て いる 方 法 は 。 マイ コン の 記憶 装置 の 一 部 で 
も 使わ れ て いる ROM (読み 出し 専用 メモ リ , read 
only memory ) や 音声 合成 用 LSI( 大 規模 集積 回 路 ) 
な ど を 使う も の で す 。 

まず , 文章 を 語句 に 分 け て , 表 1 の よう な いく 
つか の 語句 の 発声 情報 を ROM に 記憶 させ て お き ま 
す 。( 読 み 出 し 専用 メモ リ で も , 一 度 は 書き 込ん で 
や ら な けれ ば 何 の 情 報 も 読み 出せ ませ ん か ら , 特 
別 の 方 法 で あら か じ め 記 憶 さ せら れる の で す 。) さ 
き ほ どの ,「43 グ ラム で す 」 と いう 文 な ら ,「 ヨ ン 」, 
に サン ョ リグ ラム リリ デス どい が 馬 づ の 
語句 の 発音 が 記憶 され て いれ ば , その 五 つ を と り 
出し て 合成 で きる の で す 。 合 成す る と き に は , と 
ぎれ な いよ うに つなぎ 合わ せる 工夫 が され ます 。 
現在 の と ころ , そう 多く の 語句 を ROM に 記憶 さ 
せ て お く の は 困難 で すか ら , 作れ る 文 , つま り , 
し ゃ べ れ る 内 容 に は 当然 制限 が あり ます 。 
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表 1 ROM に 記憶 され て いる 語句 の 例 


語句 発音 語 発音 語句 発音 
1 イチ 6 ロク 0 ゼロ 
2 ーー 7 ず gT リグ 
3 サン 8 2 KO y 王 と 
4 ヨン 9 キュ ウ 
5 コ 10 ジュ ウ 


圏 ア ナ ロ グ 信号 と ディ ジタル 信号 


音声 は 空気 中 を 振動 と し て 伝わる 一 種 の 波 で , 
時 々 刻々 連続 的 に 変化 し て いま す 。 こ の よう な 信 
号 を アナ ログ 信号 と 呼び ます 。 テ レビ や ラジ オ で 
受信 し て いる 信号 も アナ ログ 信号 で すね 。 一方, 
電気 の スイ ッ チ の よう に , ON, OFF の どれ か の 状態 
だ け で, 中 間 の 値 を と ら な いよ うな 信号 を ディ ジ タ 
ル 信 号 と 呼び ます 。 マ イコ ン の 中 で 扱わ れ て いる 信 
号 は ディ ジタル 信号 で す 。 記 憶 装 置 は 0 と 1 の ビッ 
ト が た くさ ん つま っ た ディ ジタル 信号 の か た まり 
どう 思 窟 紀 。 

コン ピュ ー タ が 直接 扱う の は ディ ジタル 信号 で 
すか ら , 音声 を 合成 し た りす る に は 音声 の アナ ロ 
グ 信 号 を ディ ジタル 信号 に 変換 し ます 。 図 1 は (s ) 
の アナ ログ 信号 を (b ) の ディ ジタル 信号 に ある 方 
式 で 変換 し た 様子 を 示し て いま す 。 アナ ログ 信号 
を ディ ジタル 信号 に 変換 する こと を A/D 変 換 , 逆 
に ディ ジタル 信号 を アナ ログ 信号 に 変換 する こと 
を D/A 変 換 と いい ます 。 


信号 
ー ーー-> 時 間 
大 き さ 
(b) ディ ジタル | | Si | | トト に 園 陸 
図 1 信号 9 
アナ ログ 信号 と ーー > 時 間 
ディ ジタル 信号 避 6 
語句 を ROM に 記憶 さき せる と き は この よう な ディ 
田 A/D 変 換 と D/A 変 換 = 


この 変換 を 行う 装置 は 昔 か らい ろ い ろ あ り ま す 
が , 変換 の 一 つの 方 法 は 次 の よう な こと で す 。 
A/D 変換 で は , 図 2 の よう に , まず 一 定時 間 ご 
と に 音声 信号 を 中 段 の 図 の よう に 抽出 し ます 。 次 
に 抽出 し た 信号 の 隣 合っ た 2 個 を 比較 し て , 増加 の 
方 向 な ら 1 に , 減少 な ら 0 に , 等 し けれ ば その 直 
前 の 0 か 1 の 値 を 続け る と いう 規則 で 0 と 1 の 列 
に 直し ます 。 つ まり , 時 間 tn-i と tn で の 中 段 の 抽出 
信号 を それ ぞ れ v:- ュ と vn と し , 変換 結果 の ディ ジ 
タル 信号 を d。 と する と , 

も し vY ョ vn-i な ら , di 三 1 

も し vn 三 vn- 1 なら, dn 三 d ュ n- ュ 

も し v』 く vn- 1 な ら , d: テ 0 


ジタル 信号 に 直し た 0 と 1 の 列 を 書き 込む の で す 。 
D/A 変 換 は , A/D 変 換 の 逆 の 仕事 を し ます 。 
図 3 を 見 て で 下さい 。 ディ ジタル 信号 が 1 の と き は 
斜め 増加 の 方 向 に 線 を 描き , 0 な ら 減 少 方 向 に 一 
定 の 線 を 描い て 下がり ます 。 実 際 に は アナ ログ 信号 
に 再現 し た 波形 が 元 の 音声 信号 に 似 て くる よう に 
さら に 種々 の 工夫 を し て いま す 。 こ の 仕事 は 音声 
合成 用 LSI で 行い ます 。 波 の 形 を 作り 出し て , 図 2 
と 図 3 の 交換 の 様子 を 画面 に 表示 させ る プロ グラ 
ム P25-2 を 付録 (192 貞 ) に の せ て お きま す 。 その 
結果 の 一 部 は カラ ー 頁 (88 頁 ) に あり ます 。 


一 ROM 


ROM は どの 場所 か ら で も 短 時 間 ( 数 マイ クロ 秒 
1 マイ クロ は 吾 万 分 の 1 秒 ) で デー タ が 取り 出せ 


2 
音声 信号 
( 抽 出 ) 呈 
抽出 信号 
fo れれ 7 
(ディ ッ タル) 上 
ディ ジタル 値 
図 2 ディ ジタル 信号 
AD 変換 


111110000011001100011110000110011001111 


-1 ち 
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アナ ログ 化 昌 


(b) アナ ログ 信号 


図 3 
DA 変換 


(a) ディ ジタル 信号 | | | | | | | | | | | | 


ます 。 どの 場所 か ら で も 取り 出せ る よう に する た 
め に 記憶 場所 を 1 バイ ト ( ニ 8 ビッ ト ) の 区 域 に 
分 け , 番号 が 付け られ て いま す 。 こ の 番号 を 番地 
(アド レス , address) と 呼び ます 。 表 1 の 語句 の 音 
声 信 号 も ディ ジタル 信号 に し て , ROM の 一 連 の 記 
憶 場 所 に 1 番地 に 1 バイ ト ず つつ 書き 込ま れ ま す 。 
表 1 の 語句 の 書き 込み に 約 4.000 バ イト (これ を , 
1.000 グ ラム を 1 キロ グラ ム と いう よう に , 4 キロ 
バイ ト と いい , 記号 で 4 KB な ど と 書き ます ) の 
記憶 容量 を 持つ ROM を 使い ます 。 

ROM か ら デ ー タ を 取り 出す と き は , その デー タ 


の 覚え られ て いる 場所 の 番地 で 指定 し ます 。 一 度 
ROM に 書き 込ま れ た デー タ は 電源 が 切れ て も 消え 
ませ ん 。 普段 キー ボー ド か ら 打 ち 込 ん だ BASIC の 
プロ グラ ム や デー タ は RAM( ラ ンダ ム ア ク セス メ 
モリ , 好き な 番地 に 読み 書き が で きる 記憶 装置 , 
ラン ダム は 勝手 に . アク セス は 接近 する と いう 意 
味 合い で す ) に 記憶 され ます の で , 電源 を 切れ ば 
消え て し まい ます 。 


較 音 声 合成 の 方 法 


マイ コン と 外 の 世界 と の 間 の 情報 の や り と り は 
ポー ト が 出入 り 口 に な り ま す 。 前 回 は マイ コン 
の ポー ト か ら の 入力 の 例 を 扱い まし た 。 音声 合成 
を 行う に は , どの 語句 を 使え と いう 指令 を ポー ト 
か ら 出 力 し ます 。 音声 合成 の LSI は 一 つの 仕事 を し 
て いる 一 一 つま り 話 し 中 の 一 一 と き に は 次 の 指令 
が き て も 困り ます か ら , マイ コン 側 で , 話し 中 か 
どう か の 信号 を ボート か ら 入 力 し て 知っ て お く 必 
要 も あり ます 。 


や MT Io 
制御 信号 


ーーーーーーーー4ーーー ニ ーー ニーーーーーーーーー ニ っ ー 


ー の r 肖 叶 哨 


4 マイ コン と 音声 合成 基板 の 接続 
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表 2 

音声 合成 基板 に 対す る 

マイ コン か ら の 指令 の 0 
コー ド 


何 も 動作 し な い 
~ イ チ ” と 発声 せよ 


" ニ ^ と 発声 せよ 
"サン "と 発声 せよ 


"ヨン “と 発声 せよ 


内 答 


"ハチ "と 発声 せよ 
"キュ ウ " と 発声 せよ 
"ジュ ウ " と 発声 せよ 
"ゼロ "と 発声 せよ 


~ グ ラム" と 発声 せよ 


5 * ゴ "と 発声 せよ 13 "デス “と 発声 せよ 
6 “ロク "と 発声 せよ 14 女性 の 音声 に 変え よ 
7 "ナナ "と 発声 せよ 15 男性 の 音声 に 変え よ 


図 4 に 装置 の 接続 の 様子 を 示し ます 。 音 声 合成 
を 行う に は , マイ コン は 表 2 の よう な コー ド を ポ 
ー ト か ら 制 御用 LSI に 送り ます 。 そし て , 「 コ ー ド 
を 受け 取れ 」 と いう 信号 (これ を スト ロー プ 信 号 
と よび ます ) を 出す と , 制御 用 LSI は コー ド を 受け 
取り , 指定 され た 語句 デー タ の 入っ て いる 開始 番 
地 か ら 順 に 番地 指定 を し て 音声 の ディ ジタル 信号 
を ROM か ら 音 声 合 成 LS【 に 送り ます 。 音声 合成 し 
SI は それ を 順に アナ ログ 信号 に 変換 し , 増幅 器 を 
通し て 音声 を スピ ー カ か ら 出 す と いう 手順 で す 。 
音声 発生 中 は 話し 中 を つげ る 信号 (これ を 話し 中 
信号 と か ビジ ー 信 号 と いい ます ) が 出 て いま す 。 
語句 デー タ の 最後 に は 「 終 了 」 信 号 が 入っ て お り , 
音声 合成 LSI【 は その 信号 で 語句 の 発生 を 終了 し 。 
同時 に 話し 中 信号 を 止め ます 。 そこ で , また 次 の 
コー ド を 送れ る よう に な り ま す 。 表示 1 (次 頁 ) 
に 語句 発声 の 仕事 の プロ グラ ム を 示し て お きま す 。 


較 ポー ト か ら の 出力 


ポー ト か ら 制 御用 LSI に 信号 を 送る に は , た と え 
ば A に 1 バイ ト の 情報 を 入れ て お き , 
OUT 177, A 
と 書き ます 。177 は ポー ト の 番号 で す 。 一般 に 
OUT p, x 


と 書き , 入力 の と き に 用 いる INP(p) と 違っ て , 出 
力 用 の OUT は 文 で す 。 
そこ で , p は ポー ト の 番号 , x は 送り 出す 1 バ 
イト の (10 進 ) 数 値 表 現 を 値 と する 式 で す 。 
p の 値 も x の 値 も 0 一 255 の 整数 で な けれ ば な り 
ませ ん 。 
プロ グラ ム P25-1 の 説明 
この プロ グラ ム は , 入力 され た デー タ X(0 ミ XX 
<100) に 対し て , 音声 に 変換 する た め の コ ー ド 列 
を 配列 C に 作り , ポー ト 177 か ら 出 力 し て 音声 を 合 
成 さ せる も の で す 。 た と えば , 
メー43 の と き 
C(0)=14 一 女声 を 指定 。 
C(1) ニ 4 一 ヨン と 発声 させ る 。 
C(2)= ニ 10 つ ジュ ウ と 発声 させ る 。 
C(3) ニ 3 一 サン と 発声 させ る 。 
G(4) テ 12 つみ グラ ム と 発声 させ る 。 
C(5) 三 13 一 デス と 発声 させ る 。 
と いう コー ド 列 を C(0) か ら C(5) に 作り 出し ます 。 
X の 値 が ゼロ の と き , 1 か ら 9 の と き , 10 台 の と き 
は コー ド 0( 何 も 動作 し な い ) を 適当 に 使い ます 。 
行 2 は X を 入力 し ます 。 この 行 を 前 回 の は か り 
か ら の 重き さ の デー タ を 受け る よう に する の も 簡単 
ん Ro 
行 40 は C(0) に 女声 指定 の コー ド 14 を 代入 し ます 。 
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表示 1 プロ グラ ム P25-1 音声 合成 


まり REM  P25 ニ 1 李 ツ セイ : サウ も イ 
20 INPUT X 

3 づ 0 REM ーー コー ト " ヲ ツク ル ーー 一 
40 C(0)=14 


80 C(4)=12 
20 C(5)=13 


110 FOR 1I=O TO 5 


2 18 1 時 吉 の もど 
より OUT も 7 の 4 
450 0UT 179.0 
160 NEXT 1 

170 END 


男声 に し た けれ ば C(0) ニ 15 と し ます 。 

行 50 は X の 10 の 位 を 調べ て コー ド に し ます 。 XX 
が 20 よ り 小 さけ れ ば C(1)= 0 と し ます 。 

行 60 は 「 ジ ュ ウ 」 を 発声 させ る コー ド 10 を C(2) 
に 代入 し ます 。 X が 10 よ り 小 さけ れ ば コー ド 0 を 
C(2) に 代入 し ます 。 

行 70 は 文 の 1 の 位 を コー ド に し て C(3) に 代入 し 
ます 。X が ゼロ な ら 「 ゼ ロ 」 を 発声 させ る コー ド 
11 を C(3) に 代入 し ます 。 

行 86 は 「 グ ラム 」 の コー ド 12 を C(4) に 代入 し ま 
5 

行 90 は 「 デ ス 」 の コー ド 13 を C(5) に 代入 し ます 。 

行 100 か ら は ポー ト か ら の 出力 の 部 分 で す 。 
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っ 50 C(1)=INT(X/10): IF X<20 THEN C( 1 )=0O 
60 C(2)=10:TIF X<10 THEN C(2)=0O 
70 C(3)=X MOD 10:IF X=0O THEN C(3)=11 
100 REM ーーー ホッ ー ト カラ シュ ツリ ョ ク ーーー 


120 IF (INP(178) AND &H8)=8 THEN 120 


行 110 は C(0)ーC(5) を 順に 出力 する た め の for 文 で 
す 。 

行 120 は ポー ト 178 で 話し 中 信号 を 受け 取り ( 下 
位 ) 4 ビッ ト が 1000 (10 進 で 8 ) な ら 話 し 中 で あ 
る こと を 検出 し , 話し 中 で な けれ ば 次 の 行 に 移り 
に 

行 130 で は C(I) を ポー ト 177 か ら 制 御用 LSI に 出 
2 ま 流 。 

行 140 で は , 「 そ の コー ド を 受け 取れ 」 と いう ス 
トロ ー プ 信号 を 制御 用 LSI に 送り ます 。 その た め 
に ポー ト 179 番 を 使い ます 。 

行 110 で は スト ロー ブ プ 信号 を 解除 し て お きま す 。 
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候 放 送 日 3 月 30 日 ( 水 ) 


て 考え て み ま し ょ う 。 


プロ グラ ム 作 り を 楽し も つう 


人 @ 再 放送 日 4 月 3 日 (日 ) 


これ まで 25 回 に わた っ て , 例題 を 中 心 に 実際 に マイ コン を 動か し て , 楽 
し ん で きま し た 。 マイコン の 楽し み は ま だ まだ つき ませ ん 。 今後 さら に 理 
解 を 深め て も っ と も っ と 楽し むために , まとめ と 今後 の と りく み 方 に つい 


圏 と りあ げた 素材 


この テキ スト の 25 回 まで に と りあ げた 例題 に は 
次 の よう な 素材 が 含ま れ て いま す 。 

図案 ・ 模 様 ・ 図 形 

グラ フ ・ 幹 葉 表 示 

作 表 

乱数 実験 

遊び 

学習 

信号 の 入出 力 

これ らき を 今後 さら に 楽し むために 共通 に 必要 な , 
文字 処理 の 手法 。 並べ 換え な どの 算法 , 画面 を 楽 
し く 使 うた め の 技術 ,。 キー ボー ド か ら の INKEY$ 
に よる 入力 な ど を 説明 し まし た 。 と くに , 重点 を 
置い た の は プロ グラ ム 作 り の カカ を つけ る 基礎 と な 
る 処理 手順 を いか に 考え ,. いか に まとめ て ゆく か 
の 過程 を 見 て も ら う こと で す 。 

これ か ら さ ら に マイ コン と 楽し く 付き 合っ て い 
こう と する 人 は , 上 に あげ た 素材 を それ ぞ れ 発展 
きせ て ゆく で と が で きる で じ よ うる 


圏 素材 の 発展 


図案 や 模様 は プロ グラ ム の 構造 と し て は 簡単 な 
print 文 だ け を 使っ た も の か ら , 第 19 回 の 繰り 返し の 
模様 や , 第 20 回 の ブロ ッ ク 遊 び で の プロ グラ ム を 使 
っ た り , 改良 し た り し て , 思わ ぬ パ ター ン を 見 い 
出す 楽し み が あ る で し ょ う 。 こ の さき , 数 学 的 な 


図形 の 表示 や 立体 的 な 図形 の 表示 な ど を 工夫 し て 
ゆけ ば , さら に 楽し み の 世界 は 広く な る で し ょ う 。 
統計 的 な グラ フ や 幹 葉 表 示 は 実用 的 な ば か り で 
な く , プロ グラ ム の 技術 と し て も 挑戦 に 値する も 
の が あり ます 。 作 表 も 実用 的 に 役に立つ で し ょ う 。 
家庭 の 中 で の 家計 簿 の 集計 表 な ど で も よい で し ょ 
うし , 第 18 回 で 紹介 し た ゲー ム 記 録 の 集計 表 な ど は 
家族 ゲー ム を 楽し くす る で し ょ う 。 今後 記録 を 補 
助 記憶 に 保存 する 手法 や プリ ンタ へ の 出力 の 手法 
を 学べ ば , この 種 の 処理 は 一 段 と 便利 で 楽し いも 
の 所 な る で 必 よ う 。 

乱数 は 確率 の 感覚 を 養う た め に いろ いろ と 利用 
で きる で し ょ う 。 乱数 は 各種 の ゲー ム に か か せま 
ぜん 。 トラ ンプ を 切る こと に 相当 する デ タ ラ ペ な 
カー ド 順 を 作る 算法 も 勉強 され る と よい で し ょ う 。 
この テキ スト で と りあ げた お し どり の 遊び は 一 
人 遊び で す が , 一 人 遊び に は 数 学 的 に お も し ろ い 
論 を 持つ も の が 多く 頭 の 体操 に な る で し ょ う 。 
パズル 好き の 人 に 好適 な 課題 で す 。 パ ズル の 本 を 
見 れ ば 格好 の 課題 が みつ か る で し ょ う 。 前 期 テ キ 
スト に ある 板 並べ パズル や よく 知ら れ て いる 石 と 
り ゲ ー ム な ども 挑戦 的 な 課題 で す 。 

学習 用 プロ グラ ム は , 自分 用 に 便利 な も の を 作 
る で と が で きま す 。 デー ダ を 打つ こと を いと わな 
けれ ば , 社会 科 で 習う 情報 , 英語 の 単語 を は じ め 
と する いろ いろ な 練習 問題 の 工夫 , 最近 で は 国語 
の 勉強 に マイ コン を 利用 し て いる 高校 の 先生 も あ 
る そう で す 。 漢字 を 使え る 装置 が 安く な れ ば 学習 


161 


用 プロ グラ ム は 一 段 と 発展 する で し ょ う 。 
信号 の 人 出力 と し て , マイ コン に ば ね ば か り を 
接続 し た り , 音声 合成 の 問題 を と りあ げ ま し た が が, 
エレ クト ロニ クス の 好き な 人 に は 楽し い 分 野 と な 
の NeE つ 。 

この ほか に も , マイ コン を 使っ て 楽し め る 課題 
は た くさ ん あり ます 。 た と えば , 音楽 の 演奏 や シ 
ン セ サイ ザー を 趣味 に し て いる 人 も 大 勢い ます 。 


圏 チ ャ レン ジ し よう 


マイ コン の 楽し み は , エレ クト ロニ クス の 工作 
を する に し ろ ,。 プロ グラ ム 作 り に し ろ る , それ が 完 
成 し て 自分 の 思う よう に 動い た 瞬間 の 喜び を 味 わ 
うこ と が いち ば ん 大 きい よう で す 。 や や 自己 満足 
の 気味 も や あり ます が , 自分 の 力 相応 に 尊 分 難し い 
と 思わ れる プロ グラ ム に 挑戦 し て みて 下さ い 。 


圏 独創 性 を 養 お う 


2 ルン SO の 人 E め 人 グ ログ ラム で も 。 まゆ 
の ログ の ラバ が あれ ば けっ こう 使え ます 5 こう 
う 使 い 方 も 悪い わけ で は あり ませ ん 。 これから は 
良い プロ グラ ム が どん どん 開発 され て 便利 に 使え 
ip(S00 の 0 35 


た だ , 中 学生 や 高校 生 の 人 々 が 実用 的 な 意味 で 
マイ コン を 使う 必要 が ある か は 疑問 で す 。 す ば らし 
い 独 創 的 な アイ デア の ある プロ グラ ム を 作り 出し 
て ほし いも の で す 。 日 本 で は な か な か 良い ソフ ト 
ウェ ア が 育っ て いな い の で す 。 


圏 プ ログ ラム の 虫 取り 


いざ プロ グラ ム を 作っ て みて も な か な か 思う よ 
うに は 完成 し な いも の で す 。 ベテラン で も 苦労 は 
いつ も の こと で す 。 プ ログ ラム の 中 の 誤り を 忠 ( 
bug, バグ ) と 呼び 、 そ の バク の 原因 を 追求 し て 
プロ グラ ム を 直す こと を 躍 取 り (debug, デバ グ ) と 
いっ て いま す 。 プ ログ ラム が うま く 動 か な けれ ば 
機械 の 故障 は 別 と し て , どこ か に 誤り が ある は ず 
だ と わか っ て いて も , その 原因 が な か な か つか め 
な いこ と が あり ます 。 人 間 に は 思い 込み と いう こ 
と が あり ます か ら 一 層 混 乱す る の で す 。 

プロ グラ ム の 打ち 込み の と き 


アイ (英字 ) イチ 英 小 女池 エル イチ 
1 dc ] 2 
オー( 英 字 ) ゼロ 英 小 婦 字 オー セロ 
(ORUSESWi2) 9 」 記 0 


な ど を と り 條 え る と , あと あと その こと が 原因 に 
な っ て も わか ら な いこ と が し ば し ば で す 。 
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マイ コン が 誤り の ある こと を 知ら せ て くれ る の 
は , 多く は 表面 的 な 現象 を と ら え て いる だ け の こ 
Gr 

た と えば , next に 対す る for 文 が な いと いっ て 
き て も for 文 は ある の が 普通 で す 。 2 重 ル ー プ で 


10 FOR 1=1 TO 5 
20 FOR J=1 TO 5 
30 PRINT 1,J 
40 NEXT 1 

っ 0 NEXT J 


を 実行 し て みて 下さ い 。 これ な ら , 行 40 の next 1 
(で エ で な い ) が お か し いと いっ て きま す 。 そ こ で 敵 
を i に 変え て 実行 し ます と 行 50 の next に 対す る for 
文 が な いと 指摘 し ます (機種 に よっ て 誤り の 指摘 
の 仕方 は 異な り ま す が )。 要 は 行 40 と 50 の I と J を 
入れ 直 え て いる の で す 。 

千 局 の と ころ , 誤り を ふせ ぐに は , 処理 手順 を 
あら か じ め よ く 考 えて そこ に 誤り が な いよ うに す 
る こと :』 次 に プロ グラ バ を 書く ぐ と どき に 誤り を し な 
いよ うに 注意 する こと , 次 に 打ち 込み の 誤り を よ 
く 検 査 す る こと な ど と , 前 に さか の ぼる ほど 注意 を 
払う ほか あり ませ ん 。 な お , 誤り の 知ら せ ーー 一 エ 
ラー メッ セー ジ ,。 error message- 一 は 英語 で 表 
示さ れる の が 普通 で す 。 最初 の うち は , 機種 ご と 
の 説明 書 を よく 調べ る こと が 必要 で し ょ う 。 

も う 一 つの 例 を あげ まし ょ う 。 割り 算 の 分 母 の 
値 が ゼロ に な っ て 実行 が と まっ て し まう こと が あり 
ます 。 自分 で は ゼロ に な る は ず は な いと 思 つ て い 
ます か ら , その 原因 が わか り ま せん 。 こ の よう な 
と き は 落ち つい て , その 分 母 に ある 変数 が let 文 
の 右辺 で 代入 され た り , read 文 で 値 が 読み 込ま れ 
て いる と ころ を 探し て , その 直後 に print 文 を 挿入 
し て , その 変数 の 値 を 印字 させ て みる の が よい で 
ビレ よ つう 。 グ ログ ラバ を 作 う て ゆく と き は ブロ グ 
ラム の 要 所 要 所 に print 文 を 入れ て , そこ まで が 期 
待 ど お り に 進ん で いる か チェ ッ ク す る 方 針 を 持つ 
こと が 大 切 で す 。 

詩 り の 原因 を 見 つけ る こと に 上 手 に な る た め に は 


ユー モア の 精神 が 必要 で ある と も いい ます 。 原因 
が わか ら な く て 泥沼 の よう に な っ た と き に , 少し 
観点 を 変え て 考え な お す 余 裕 の 気持 を ユー モア と 
いう の で し ょ う 。 ま た, 相談 の で きる 仲間 を 持つ 
SSR で し (よる うな 

誤り を 恐れ る こと は あり ませ ん 。 誤り や すい の 
も 人 間 の 人 間 た る 所 以 で す 。 誤り を 経験 し て 賢く 
な っ て ゆく の が 人 間 な の で す 。 


較 フ ァイル の 利用 


プロ グラ ム を 保存 し て お く の に 補助 記憶 装置 を 
利用 し て お く こ と に つい て は すでに 触れ まし た 。 
補助 記憶 な ど に 保存 され る , 一 つ に まとまっ た 情 
報 の 集 り を ファ イル ーーfile, 帳 短 一 一 と いい ます 。 
大 量 の デー タ を 処理 する と き や , デー タ を 保存 し 
て お きた いと き は ファ イル と し て 補助 記憶 に 残せ 
ます 。 こ の 使い 方 は 説明 し ませ ん で し た が , マイ 
コン の 高度 な 利用 に 欠か せま せん 。 カ セッ ト テ ー 
プ 装 置 を 補助 記憶 装置 と し て 使用 する と き は , デ 
ー タ の 出し 入れ に 相当 の 時 間 が か か る こと を 和 賞 悟 
する 必要 が あり ます 。 数 寺 件 を 越え る 統計 調査 デ 
ー タ の 処理 や 大 き な 事 務 処 理 は マイ コン の 得意 で 
は あり ませ ん 。 補助 記憶 装置 が 不 十分 と いう ほか , 
統計 解析 用 の よい 汎用 ソフ トウ ェ ア が 整備 され て 
いな いか ら で す 。 分 野 に よっ て は マイ コン で な く 大 
き な 計 算 機 を 使っ た 方 が よい 場合 が あり ます 。 


圏 お わり に 


マイ コン の 出現 で 大 勢 の 人 が マイ コン に 親しむ 

EK くつ CS まま: の oN じまい こ だ ク バビ 2 の 
と は どう も わか ら な いか ら 専 門 家 に 任せ て お こう 
と いう 風潮 も あり まし た 。 こ れ か ら は , 多く の 人 が 
それ ぞ れ の 立場 で で コン ピュ ー タ に 関心 を 持ち , 
社会 に お ける 役割 に つい て 考え て いた だ けた ら と 
思い ます 。 将来 マイ コン が どう 発展 し て ゆく か に 
興味 も あり ます が , どう 使っ て ゆく か は 秘 達 皆 が 
決 め る と で す 。 
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付録 目次 PS 
| マイ コン (機種 X) の キー ボー ド 164 


2 BASIC 用 英語 ミニ ミニ 辞典 ( 兼 索 引 ) 166 
3 記号 の 名 称 と お も な 使い 方 一 覧 171 
4 文字 の 符号 172 
5「 や っ て みよ う 」 の 解答 例 173 
6 プロ グラ ム 集 177 


ト さ ON 
回 固 四 oo _ 画 回 回 由 了 


_ 峰 帳 皿 固 


_ss AA 選 基 放 ミー ミー 玉 曲 ( 芋 表 ). 


使い 方 


・ 見 出し 語 は アル ファ ベッ ト 順 に な っ て いま す 。 
・ テ キス ト で 使用 され る BASIC の 文 , 関数 , 演算 
子 (演算 の 記号 ) や 指令 は 緑色 で す 。 その 形式 は 
原則 と し て 次 の と お り で す 。 

見 出し 語 [カナ で の 読み , 発音 ] 文 , 関 数, 指 
令 な どの 種別 [日 常 単語 と し て の 代表 的 意味 ]。 
例 と その 説明 。 (使用 し て いる 主 な プロ グラ ム 番 
号 ま た は 頁 数 ) 


・ そ の 他 の 見 出し 語 は 原則 と し て 次 の 形式 で す 。 
見 出し 語 [カナ で の 読み , 発音 ] コン ピュ ー タ 
用 語 と し て の 意味 [ 日常 単 語 と し て の 代表 的 意味 ] 。 
必要 に 応じ て 解説 。 (使用 し て いる 主 な 真 ) 
・ 右 向き 矢印 一 は 「 参 照 せ よ 」 の 意 で す 。 
・BASIC の 用 語 や 指令 は 機種 に よっ て 相違 が あり 
ます 。 ここ で は 機種 X で 使用 し た 用 語 だ け を と り 
あげ まし た 。 


absolute [| アブソルート, Sbsalu:t] 絶対 値 の [絶対 ]。 
abs [アプ ス ] 絶対 値 を と る 関数 。 

例 ABS(-5) は 5 を 与え る 。 ( P25-2,192 ) 
A/D analog/digital の 略 、。 アナログ (連続 ) 信 号 を ディ 

ィ ジ タル (離散 ) 信号 に 変換 する と き に 用 いる 。 

つ analog, digital (157) 
address [アド レス , edres] 番地 [住所 ,、 あ て 名 ]。(158) 
algorithm [アル ゴリ ズム ., 距 lgari@am] 算法 [ 石 除法 ]。 

(137 ) 
analog [アナ ログ , SnalS:g] 相似 型 , 計量 型 。 連続 弄 

[相似 物 ]。 (156) 
and [アン ド , an(d)] 論理 積 を と る 演算 子 [そし て , 

か つ ]。 

例 IF F= テ 1 AND I く >10 THEN PRINT " " 

条件 ドニ 1 と 条件 1 く > 10 が と も に 成り 立つ な ら … 

P=P AND &HF1 ビッ ト ご と に みて ,. と も に 1 の 

と き 1 , その 他 の と き は 0 を と っ て 結果 の ビッ ト 列 

を 作る 。 (135,153) 
array [| アレ イ , aril] 配列 [衣装 、 勢ぞろい ]。 

ー つ な が り の 記憶 場所 に 共通 の 名 前 を 付け た も の 。 
例 DIM AS(10), F(30). D(14, 30) 配列 の 寸法 を 
宜 言 する 。 (55,95,106,138) 
asc [アス ク ] 関数 の 一 種 。ASCII (アス キー., 
can Standard Code for Information Interchange, 

米国 標準 (規格 ) の 情報 交換 用 文字 符号 ) に 由来 す 

る 。 

例 PRINT XS: ASC(XS) 


Ameri- 


ASC(X$) は X$ の 先頭 
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の 文字 の 待 号 (番号 ) を 与え る 。 (136) 
basic [ベー シッ ク , beisik] BASIC プロ グラ ミン グ 言 
請 [ 基 本 的 な ]。 BASIC は Beginner's All-purpose 
Symbolic Instruction Code の 員 。 本 テキ スト で 用 い 
て いる プロ ダラ ミン グ 言 語 。 
beep [ビー プ , bi:p] 文 [ピー と いう 擬 声 語 ]。 
例 IF M2>0 OR M2>5 THEN BEEP:GOTO 170 
ピー と いう 音 を 一 定時 間 出 す 。 (46,111 ,134 ) 
binary digit [バイ ナリ ー デ ィ ジ ッ ト , bainari didait] 
2 進数 . digit に は 指 と いう 意味 が ある 。 (148) 
bit [ビッ ト , bit] 2 進数 の 1 けた [小片 ]。 binary digit 
の 略 。0 また は 1 の 値 を と る 。 情 報 の 基本 単位 。 (150) 
break [プレ イク 、 br@ik] 中 断 す る [破る]。 
例 Breakin30 行 30 で 実行 中 断 。stop 文 の 実行 
や 実行 中 の 較 キ ー の 受付 に よっ て , 画面 に 表示 され 
る 。- stop (25,39) 
bubble [バブ ル , bAbl] デー タ 並 べ 換 え の 泡立て 法 
(bubble sort) [ 泡 ]。 一 sort (140) 
bug [バグ , bAg] プロ グラ ム の 誤り [ 虫 ]。 一 dedug(162) 
byte [バイ ト , baitl バイ ト (= テ 8 ビッ ト )。 (158) 
character [キャ ラク タ , kerakte] 文字 [文字 , 性 格 , 
配役 ]。 英字 , 数 字 , カナ , 各種 の 記号 を 含め て 文字 
と いう 。-->letter, digit, sign, string。 
chrS[ キ ャ ラク タ ・ ダ ラ ま た は , クル ・ ダ ラ ] CHRS(x) 
は 待 号 x に 対応 する 文字 を 1 字 作 り 出 す 関 数 。 
例 PRINT CHRS(34) 引用 符 "を 印字 する 。 
PRINT CHRS(12): 画面 消去 の 文字 を 画面 に 送 


る と いう こと で , 画面 消 ま の 働き が 起こ る 。(67,133) 
clear [クリ ア , klie] 文 [晴れ た , きれ い に す る ]。 

例 CLEAR 500 主 記憶 の 文字 領域 を 500 バイ ト 確 

保 す る (すべ て の 数 値 変数 を 0 に , 文字 列 変数 を 空 文 

字 列 に 設定 する )。 機種 に よっ て 異な る 意味 を 持つ の 

で 注意 。 (122) 
clr 圏 キ ー。 画面 を 消 ま する 。clear の 略 一 home (9) 
code [コー ド , k6ud] 待 号 [暗号 法典 ]。 色 符号 や 文 


字 待 号 と し て 用 いる 。 (23,171) 
color [カラ ー, kAle] 文 [ 色 ]。 
例 COLOR 6 黄 色 に 指定 する 。 色 待 号 は , 1( 青 )、 


2 ( 赤 )、 3 ( 紫 ), 4 ( 緑 )、5 (水色 ), 6 ( 黄 ), 7 ( 白 ), 

0 ( 黒 ), 機種 に よっ て 色 の 指定 方 法 は 異な る 。 (23) 
console [コン ソウ ル , k3nsoullkansoul] 文 [ 操 作 卓 ]。 

例 CONSOLE 0,25,0,1 画面 の スク ロー ル 開 始 行 

を 第 0 行か ら 、 スク ロー ル 行 数 を 25 行 に し , 機能 キ 

ー の 表示 を 消し , カラ ー 使 用 と する 。 (23) 
cont [コン ト ] 指令 [continue の 略 ]。stop 文 の 実行 な 

ど に より 実行 が 中 断 さ れ た あと , 実行 の 継続 を 指示 


する 。… contimue (39) 
continue [コン ティ ニュ ー, kantinju(:)] cont の 由来 
[続け る ]。 
counter [ カウンタ, kaunte] 数 える も の , 計数 器 


[ 箇 定 | (40) 
cr carriage return の 略 。carriage は 車 , 馬車 の 意 。 タ 

イプ ライ タ の キャ リッ ジ を も どす (return) こ と か ら 

行 の 先頭 に 復帰 する 意味 で 使わ れる 。-return( キ ー ) 
cursor [カー サ , k を :s み g] カー ソル [ 走る 人 ]。 画面 で 

の 次 の 印字 位置 を 示す 印字 位置 表示 。 機 種 X で は 画 

の 印 が 点 減 し て いる 。 (7,14 ) 
D/A digital/analog の 略 。 っ A/D,digital, analog (157 ) 
data [デイ タ , deita] 文 [与え られ た も の , 資料 ]。 

例 DATA 5, ABC read 文 と 対 で 使わ れる 。- 


read (27) 
debug [ デバ グ , di:bAg] プロ グラ ム の 躍 取 り [ 除 虫 す 

る ]。 一 bug (162) 
del 図 キー delete の 遇 。 画面 上 の 文字 を 1 証 ず つ 消 す 。 

ーxdelete , ins (14) 
delete [ディ リー ト , dilit] 削除 する [消し 去る ]。 


digit [ディ ジッ ト , didsit] 数 字 [ 指 と いう 意味 も ある ]。 
digital [ディ ジタル ., didsitl] 計数 型 (コン ピュ ー タ ), 
離散 的 (信号 ) [ 指 の ]。 (156 ) 


dim [ディ ム ] 文 。mension の 略 。 
例 中 m N$(15), X(15), P(15) 配列 の 寸法 を 宣言 する 。 
: (56) 


dimension [ディ メン ショ ン , menian] 寸法 [次元]。 


display [ディ スプ レイ , displi] 表示 する [示す ]。 表 


示 (装置 )。 (5) 
dollar [ダラ , de] ドル 。 記 号 $ 。 (16, 171 ) 
end [エン ド , end] 文 [ 終 り ]。 実 行 を 終了 する 。 ま た, 

プロ グラ ム の 記述 の 終り を 示す の に 用 いる 。 (36) 
equal [イク ウォ ル , if:kwal] [等 し い , ~ に 等 し い ]。 記 

号 三 。 (171) 
file [ファ イル , fail] 帳 短 [とじ込み ]。 情報 の 記録 の 

集まり 。 プ ログ ラム や デー タ を 補助 記憶 に 保存 し た 

も の は ファ イル で ある 。 (163) 
for [フォ ー, fe] 文 [この た め に , ~ に 対し て ] 

例 FOR I1=1 TO N I を 1 か ら N に 変え な が ら , 

各 I に つい て NEXT I ま で を 反復 する 。 (51) 

FOR 1=N 二 1 TO 1 STEP 一 1 きざみ を 一 1 で 。 

to, step, next (72,103 ) 
function [ファ ンク ショ ン , fADkNan] 関数 、 機能 [ 働 

き ]。BASIC で 用 意 さ れ て いる 各種 の 関数 を 指す 。 

また 機能 キー の 機能 も この 言葉 を 用 いる 。 利用 者 が 

定義 する 関数 も ある 。 

例 CHRS(X)、 ASC(X$), LEFTS(AS, 3) 
get [ゲッ ト , get] get@ 文 , get @ A 文 で 用 いる [得る ]。 

例 GET@ (XY) 一 人 K 十 N 一 1 Y+M-1), A め の 

( P20-3,187) 
GET@ A(X,Y) 一 (X,Y),W (BI2tS5 む 35) 

画面 上 の 指定 され た 四角 の 範囲 の 図形 を 配列 A や 

W に 読み 取る 。GET@A は 色 の 情報 を 含ん で 読み 取 

る 。 put 
go [ゴウ , gGul] goto 文 , gosub 文 , 

gosub 文 で 使わ れる [行く ]。 
gosub [ゴウ サブ ] 文 。 サ ブル ー チ ン へ 飛ぶ こと を 指 

示す る 。 

例 GOSUB 560 行 5660 か ら の サブ ルー チン に 飛べ 。 


on-goto 文 , on- 


> subroutine ( 119 ,135 ) 
goto [ゴウ トゥ ー, goutu:] 文 [… へ 行く ]。 
例 GOTO 50 行 50 へ 飛べ 。 (24 ) 


grph 了 賠 キ ー。 graphic の 略 .。 キー ボー ド か ら グ ラフ 
ィ ッ ク 文 字 を 押す と き に 用 いる 。 一 graphic (13,21 ) 
graphic [グラ フィ ッ ク 、 g 旭 fk 図式 の 。 グ ラフ ィ ッ 
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ク 文 字 と し て 多く の も の が 用 意 さ れ て いる 。 


( 例 ) 画 還 (13) 
histogram[ ヒ スト グラ ム , hifstagraeem] 度数 分 布 図 
(柱状 図 )。 (P9-4.,52) 


home [ホウ ム , h6um] 圏 キー [家庭 , 野球 の ホー ム ]。 
画面 の ホー ム 位 置 (左上 すみ の 原点 ( 0, 0 )) に カ 
ー ソ ル を も どす 。 な し で 押せ ば 画面 も 消 
去 さ れる 。--crr ( 9 ) 
IC 集積 回 路 。Integrated Circuit の 略 。 
江 [イフ , 中 then 文 で 用 いる [も し > な ら ]。 
if-then [イフ ゼン if-@en] 文 [も し っ な ら ~ せよ ]。 
例 IF M$= "//" THEN 100 も し MS が 文字 列 
"//”" に 等 し けれ ば 行 100 へ 行け 。 ( P5-3, 30 ) 
IF Y MOD 10=0 THEN PRINT "*|" (P12-2.71) 
inkey$S [イン キー ダラ ] キー ボー ド で 押さ れ た 一 つの 
キー を 読み と り , その 文字 を 与え る 関数 。 
例 100 X$ ニ INKEYS: IF X$=" THEN 100(133) 
inp [イン プ ] ポー ト か ら の 入力 を 行う 関数 。 
例 W= ニ INP(176) 176 は ポー ト の 番号 一 port 
input [イン プッ ト , fnput] 文 [入力 ]。 
例 INPUT C,D 変数 C と と D に キー ボー ド か ら デ 
ー タ を 入力 せよ 。 実 行 時 、 画面 に ? が 表示 され デー 
タ を キー ボー ド か ら 打 っ て 最後 に [RETURN] キー を 
押す 。 (17,23) 
ins 園 キー。insert の 略 。 画面 上 の プロ グラ ム の 編集 
で , 文字 列 の 挿入 に 用 いる 。 [SHIFT] キ ー と と も に 
用 いる と , カー ソル 位置 以後 の 文字 列 が 右 へ 移動 し 
て 空白 が で きる 。 del (14 ) 
imsert [イン サー ト , ins る :t] 挿入 する [差し 込む ]。 
insertion デー タ 普 べ 換 え の た め の 挿 入 法 ->sort(136 ) 
instr in string に 由来 する 。 あ る 文字 列 に 、 別 の 文字 
列 が 一 つづ き と し て 含ま れ て いる か 判定 し , 含ま れ 
て いれ ば , その 開始 位置 , 含ま れ て いな けれ ば ゼロ 


(152) 


を 与え る 関数 。 
例 IF INSTR (AS の @@@ 〇 〇 〇 〇 りり)>0 THEN 
370 ->string ( P13-3,79) 


int integer に 由来 する 。 整数 化 の 関数 。 
例 ? INT (6.3) は 6, ?INT (一 3.7) は 一 4 を 与え 
る 。 (67) 

integer [イン ティ ジャ , fntadsa] 整数 。 

key [キー, ki]] キー ボー ド の キー や 機能 キー [か ぎ ]。 
デー タ 並 べ 換え の 順 計 を きめ る デー タ の 部 分 を キー 
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と も いう 。 一 keyword, inkey$, keyboard (21,138 ) 
keyboard [キー ボー ド , ki:boed] キ ー ボ ー ド [鍵盤 ]。(7) 
keyword [キー ワー ド , ki:we:d] 機 能 語 [キー と な る 

主要 単語 。 BASIC の 文 の 種類 を きめ る 単語 。 

例 print, let (11 ) 
left [レフ ト , left] [ 左 の ]。 
leftS[ レ フト ダラ ] 文字 列 の 左側 の 一 部 を と り 出 す 関 数 。 

例 GS テニ LEFTS (HS, K) HS の 左 KK 個 を と り 出 し 

G$ に 入れ る 。 ( P9-1.49 ) 
len [レン ] length に 由来 する 。 文字 列 の 長 さ を 与え る 

関数 。 

例 LEN ("ABC") は 3 を 与え る 。 (80) 
length [レン グ ス , len の ] 長 さ 。 
let [レッ ト , let] 文 [ こさ せる ]。 


例 LET A$=" ナ マエ ェ " (P3-2.18) 

LET クニ クーD+N ( P8-1,44 ) 

右 の 式 の 値 を 左 の 変数 に 代入 する 。 (47) 
letter [レタ , 1ete] 英字 [手紙 , 文字 ]。 

Hime [ライ ン , 13im] 行 [ 線 、 列 ]。 1) 

line number [ライ ン ナ ン バ ] 行 番号 。 (11 ) 


ist [リス ト , jist] 指令 [一 覧 表 , 目録 ]。 
例 hist [RETURN] (jist 10 一 80, hst 80 一 な どの 使い 
方 も ある )。 プロ グラ ム を 表示 する 。 (11 ) 
16ud] 指令 [ 荷 . 積み 荷 ]。 補助 記憶 
か ら 主 記憶 に プロ グラ ム を 入れ る 。 
例 load "P5-1' (30) 
locate [ロウ ケイ ト 。, 16ukeit ] 文 [置く ]。 
例 LOCATE X 十 8 Y 十 1: PRINT "*※" 画面 の 
メ 十 8 けた , Y 十 1 行 に * を 印字 する 。(P11-1.,67 ) 
1oop [ルー プ , 1G:p] プロ グラ ム の 繰り 返し 構造 [ 輪 , 
飛行 機 の 宙返り も ルー プ ]。 (25,36) 
LSI 大 規模 集積 固 路 。Large Scale Integration の 頭 文 
字 を と っ た も の 。 (156 ) 
microcomputer [マイ クロ コン ピュ ー タ ] マイ コン 。 
midS [ミッ ド ダ ラ ] 式 中 に 用 いれ ば 文字 列 か ら 一 部 を 
抽出 する 関数 , let 文 の 左辺 に 用 いれ ば , 文字 列 の 一 
部 に 別 の 文字 列 を 代入 する 。 
例 MIDS (AS. 氏 士 1.2) ニ MIDS (AS, J 十 1.2) AS の 
K 士 1 宇目 か ら 2 文字 分 を A$ の 」 十 1 字 目 か ら 2 文 
字 分 で 置き 換え る 。 (P13-1.,79 ) 
middle [ミド ル , midl] [まん 中 , 中 間 ]。 
mod [モー ド , mod] 数 学 の 法 (modulus),、 つ まり 余り 


load [ロッ ド , 


を 求め る 演算 。 
例 65 MOD 10 は 65 を 10 で 割っ た 余り 5 を 与え る 。 
( P11-1.67) 
mount [マウ ンド , maunt] 指令 [ 山 , 登る , 据 えつ ける ]。 
補助 記憶 (フロッピー ディスク ) に フロ ッ ピ ー を 入 
れ て , 読 き 書 き の 準備 を 行う 。--rermove (30) 
new [ニュ ー, nju:] 指令 [新しい ]。 主 記憶 の プロ グラ 
ム を 消す (新しい プロ グラ ム の 打ち 込み の 準備 )。(14 ) 
next [ネクス ト , nekst] 文 [次 の ]。 
例 FOR I= ニ 1 TO N:NEXTI 一 for (P9-3,51) 
Ok [オウ ケイ 6ukei] この 表示 が 画面 に 出る と , 次 の 
指令 を 打ち 込め る [よろ し い ]。 (8) 
on [オン , an] [この 上 に , ~ に 基づい て ]。on-goto 文 、 
on-gosub 文 で 用 いる 。 
on-goto [オン ・ ゴ ウト ゥ ー] 文 。 
例 ON M2 GOTO 230.280,330.380 M2 の 値 1.2. 
3.4 に より それ ぞ れ 230,280 ,330 .380 へ 行け 。 
( P17-1.,107) 
on-gosub [オン ・ ゴ ウサ プ ブ ] 文 。 
例 ON H GOSUB 220.380.600.740 日 の 値 1.2.3. 
4 に より それ ぞ れ 220.,380 ,600 ,740 の サブ ルー チン へ 
行け 。 (131.186 ) 
or [オア , っ oe] 論理 和 を と る 演算 子 [また は ]。 
例 IF M2<0 OR M2>5 THEN BEEP : GOTO170 
M2< 0 また は M2> 5 なら ( 2 つの 条件 の 一 方 が 成 
り 立 て で ば) ピー プ し て で 答 170 へ 。 ( P17-1.,111 ) 
out [アウ ト , aut] 文 [ 外 に ]。 
例 OUT p,x 番 号 p の ポー ト か ら x の ビッ ト 列 を 出力 。 
例 Out of Data と いう メッ セー ジ も よく 使わ れる 。 
READ 文 の 実行 に 対し DATA 文 の デー タ 不 足 の 意 。 
Pareto [ バ パレート, pa:reitou] イタ リヤ の 経済 学者 。 
パレ ー ト 図 は デー タ の 分 析 に 使わ れる 。 (48) 
pten] パタ ー ン 【[ 型 。 模様 ]。 
port [ポー ト , マイ コン と 外界 と の 情報 の 出入 
り 口 [ 港 ]。 (151 ,158) 
print [プリ ント , prfnt] 文 [印刷 する ]。 印字 する ( 画 
面 へ の 表示 ) 命令 。 
例 PRINT "マイ コン 
PRINT ,S 
PRINT Ai:B: (11,17,46 ) 
print using [プリ ンド ユー ジン グ ] 文 。 書式 を 用 いて 
印字 する 。 


pattern [パタ ー ン ., 


p3at | 


と デ ウ モ ジ " 


例 PRINT USING " 科 ご こ こ コ 届 ":NS (⑪): 
PRINT USING " 失 韻 韻 半 ":X⑪) 

! 韻 韻 壮 半 ' は 整数 4 けた で 右寄せ , " 科 ロ ロ ロロ 巡 " 

は 文字 6 けた で 左寄せ で , 印字 する こと を 指示 する 

書式 用 文字 列 。 (58) 
print chr$(12): 文字 コー ド 31 以 下 の 文字 を 送る と 特 

別 な 働き を し , 12 の 場合 は 画面 消去 と な る 。 文字 待 

号 表 参 照 。 (67) 
program [プロ グラ ム , prGugrem] プロ グラ ム [計画 

番組 ] (6 ) 
put [プッ ト , pdt] put @ 文 、 put @A 文 で 用 いる [ 置 

く ]。get @ 文 や get @ A 文 で 読み 取っ た 図形 を 再 表 

示す る 。 get (135, 187 ) 
RAM [ラム ] Random Access Memory 随時 読み 書き 

可能 記憶 。 
read [リー ド , ri:d] 文 [読む ] (38) 

例 READ M$,K$ data 文 に ある デー タ を 順に 読 

み 取 っ て M$ と K$ に 入れ る 。-data 文 (P5-1,27) 
rem [レム ] 文 。 注釈 文 。 

例 REM "ナニ ヲ ラ カ イ テモ ヨイ "remark に 由来 する 。 
remark [リマ ー ク , rimGak] 注釈 [注意 。 注目 ] 
remove [リム ー ブ ,rimQ: v] 指令 [取り 除く ., は ず す ]。 

補助 記憶 (フロッピー ディス ク ) 義 置 か ら フ ロッ ピ 

ー デ ィ ス ク を は ず す と き の 指 令 。 (30) 
renum [リナ ム ] 指令 。 (41 ) 
renumber [リナ ン バ ー, rmnAmbe] [に 番号 を つけ か 

える ]。 
ret( キ ー) return の 略 。 


return [リタ ー ン , rt み :n] 


ーsmount 


renumber の 意 


文 帰る . も どる ]。 
return 文 は サブ ルー チン に 一 つ は 必要 で ,。 も と に も 
どる 。 (119) [RETURNI キ ー は プロ グラ ム の 行末 や 
入力 の 際 の 最後 に 用 いる 。 
[RETURN] キー は 機種 に よっ て 履 改 | 、 , 回 
2 か っ つて CU せる (279 

right [ライ ト 、, rait] [ 右 の ]。 

rightS[ ラ イト ・ ダ ラ ] 文字 列 の 右側 の 部 分 を 取り 出す 関 
数 。 

例 F$= ニ RIGHT$S(D$, S/2) 二 LEFT$S(D$, S/2) 
D$ の 右側 S/2 け た を 取り 出し , それ と 左側 の S/2 を 
取り 出し て 結合 し て F$ に 代入 。 ( P13-4,79) 

rnd [ラン ド ] 0 と 1 の 間 の random number( 乱 数 ) を 
発生 する 関数 。 (97) 
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例 ベ テ INT (RND(1)*6)+1 サイ コロ の 目 の よ う 
に 1 か ら 6 の 整数 を デタラメ に 作っ て X に 代入 する 。 
(101 ) 
ROM [ロム | Read Only Memory の 略 。 読 み 込み 専用 
記憶 。 (157 ) 
run [ラン , rAn] 指令 [走る ]。、 プロ グラ ム の 実行 を 指 
金 す る 。 . (8) 
Save [セイ プ ブ , seiv] 指令 。 プ ログ ラム を 補助 記憶 ( フ 
ロッ ピー ディ スク ) 装置 に 保存 する 。 (30 ) 
sereen [スク リー ン , skri:n] 画面 [映写 幕 ]。 (13) 
seroll [スク ロウ ル , skrGul] 画面 の 巻上げ .、 スク ロー 
リン グ [巻物 (11) 
shift [シフ ト 、 iift] キー [移す ]。 英字 の 小文字 か ら 大 
文字 や カナ の 大 文字 か ら 小 文字 へ の 移動 、 そ の 他 
特殊 記号 を 打つ の に 用 いる 。 (7 ) 
sign [サイ ン , sain] 記号 ・ 符 号 [し る し , 合い 図 ] 
sort [ソー ト , s3at] デー タ の 並べ 換え , 整列 [分 類 す 
る , 選び 出す , 種類 | (137) 
statement [ステ イト メン ト , steitmant] BASIC の 文 
[声明 |。 
stem and leaf display 幹 葉 表示 。 
step [ステ ッ プ , step」 きざみ [歩み ,、 足 どり ]。 ー ヶ 


for 文 

stop [スト ッ プ , stGp/st3p] 文 [止め ある]、 プ ログ ラム 
の 実行 を 中 断 す る 。-- break (39 ) 
図 キ ー は キー ボー ド か ら と 実行 を 中 断 する 。 (24) 

strimng [スト リン グ 。strin] 文字 列 [ 糸 , 細 ひも , 一 連 
の ビー ズ 玉 ]。 

string$ [スト リン グ ダ ラ ] 一 つの 文字 を 反復 し た 文字 
列 を 作る 関数 。 


例 F$=&" 二 STRINGS(N 一 2 "ロリ ) 十 " 還 ! も し N 
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4 な ら , F$= " 傍 口 口 届 ′ と な る 。 ( P20-2,130) 
subroutine | サブルーチン, sAbru:tiin] サブ ルー チン 
( 副 譜 ) [下請 け 仕事 の 意 ]。 
tab [タプ , tb] print 文 で 用 い , 印字 の けた 位置 を 指 
定 す る 。table, tabulation に 由来 する 。 
例 PRINT TAB(5) : GS : K : "ケン" この 場合 5 
けた の 空白 を と っ て G$ か ら を 印字 する 。(P9-3,50) 
table [テイ ブル , teibl] 表 [テー ブル , 表 ]。 
tabulation [タビ ュ レ イシ ョ ン , tsbjuleitan] 表 作 成 , 
作 表 。 
ten-key [テン キー] キー ボー ド 右 側 数 字 0 一 9 専用 の キ 
ー, 機種 X 々 で は , 田 国 自 回 品 園 負 回 岡 
を 含む 。 
time$ [タイ ムダ ラ ] 時 刻 の 文字 列 を 与え る 特別 の 文字 列 
変数 。 
例 PRINT TIMES と する と 00:03:15 の よう に 表 
示さ れ , TIME$= "19 : 30 : 00" で その 変数 に 時 
刻 を 設定 で きる 。 (139 ) 
to [トゥ ー, tu/ta] [- に , 一 に な る まで ]。 一 goto, for。 
Yal [ヴァ ル ] 数 字 の 文字 列 を 数 値 に 直す 関数 。 
例 FOR !=1 TO 7 STEP 3 
S=S*60 二 VAL (MIDS (TIMES, 1, 2)) 
NEXT ] 時 間 を 秒 単位 に る 直す 。 (P22-2,141 ) 
Yalue [ヴァ リュ ー, velju:] 値 [価値 ] 
variable [ヴェ リア ブル ., vg(3)riabl] 変数 [変わ りや す 
い ]。 (16) 
width [ウィ ドス , wid6] 文 [ 広 さ , 幅 ] 表示 装置 の 画 
面 の 寸法 を 指定 する 。 
例 Width 40、25 よこ 40 け た , た て 25 行 に 指定 す 
る 。 (13) 


DRND "マイ コン 3 吐 N の 昌 2 の に の 


空 白 (間隔 ) 


L 引 用 符 print "ハジ マリ マス " 
セミ コロ ン print MS : AS : つめ て 印字 
最後 の : は 改行 し な いこ と を 指示 
8 PA print ,A, 既定 の 印字 欄 に 印字 
最初 の , は 印字 欄 を と ば し 最後 の , は 改行 
せ ず 次 の 印字 欄 へ 印字 位置 を 持っ て ゆく 。 
$ ドル 記号 AS 文字 列 変数 に 用 いる 。 
3 等 号 let A$=ー "ナマ エ " 
if M$= 『"//" then 100 
NE (時 AS 十 BS 文字 列 の 結合 , 数 値 の 足し 算 
ー 負 号 (ハイ フン ) 2Z=ZーD+N 引き 算 
※ 星 印 8 
(アス テリ スク ) P①)=X⑪/S*100 掛け 算 
人 余 線 割り 算 
( 左 括弧 P) 
) 右 括 統 A*(B 十 C) 
に 小 号 if N<0 then 110 


( 不 等 号 より 小 ) 


> 大 号 
( 不 等 号 より 大 ) 


if S>=500 then 30 


る A=0:B=0 | 行 に 2 つ 以 上 の 文 を 書く ( と き の 区 切り 
半 番号 記号 print using "の 書式 
K4 アン ド 記 号 print using " 交 ロ ロ ロ ロ &" :NS 書式 

(アン パサ ンド ) HPF1 16 進 数 
! 感 嘆 符 piint using AS 書式 
) 攻 問 符 入力 要求 

? 5*3 print の か わり 

ス へ 山 記 号 2 へ N べ キ 乗 人 の 
@ 単価 記号 get @, put @ 特殊 な 文 
レン 2 の パー デミ シク バド dm A% (20) 整数 型 配列 

記号 


ゴリ ) に 金 | 


0 は 空 (null)、。 つま り 何 も な い の 
と 同じ 。 1 一 6 は 伝送 制御 用 で , Su 
ーstart of heading( 頭 書き 開始 ), 
Sx 三 start of text (本 文 開始 )、Ex= 
end of text( 本文 終結 )、 E+ デーend 
of transmission( 伝送 終了 )、 E。 テ 
enquiry( 問合せ )、Ak テ acknowledge 
( 青 定 応答 )、7 は bell( ベル )。 8 一 13 は 
書式 制御 用 で ,Bs 三 backspace( 後 退 ), 
H+ =horizontal tabulation (水平 
プ ).L ェ =Iline feed( 改 行 )、H。=home 
( 原点 復帰 )、CL ニ clear screen ( 画 
面 消去 ), Cs 三 carrlage return( 復帰 ) 
14.15 は So=shift-out (別表 に 移行 ), 
Si 三 shift-in (別表 か ら 移 行 )。 16 と 21 
ー23 は 伝送 制御 用 で 、 Ds 三 data hnk 
escape( 伝送 制御 拡張 )、 Nk 三 nega- 
tive acknowledge( 否定 応答 ), SN ニ 
synchronous idle (同期 信号 ), Es = 
end of transmission block( 伝送 プロ 
ッ ク 終 結 )、 17 一 20 は 装置 制御 (device 
control ) 用 。24 一 27 は 、Cxーcancel 
(取消 ),E テ end of medium (媒体 
終端 )、Sg= ニ substitute( 置換 )、 Ec = 
escape( 拡張)。 28 一 31 は 本 来 は 情報 分 
離 用 で す が , 機種 々 で は これ を カー 
ソル 移動 用 に 使っ て いま す 。 32 は 空 
自室 ず 》 


一 覧 表 は 172 頁 参照 
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6 の RSE 


RS 


10 進 文字 
空 
SH 


ひら の へ いひ 品 尽 の いい は の 
「m 
Po) 


の 
UI 
Ne 博幸 ーー 四 こ っ 


は 〇 へ ・ 1・ キネ ンス 


< ぐい 0 へ ひい ひ ロ 尽 の ゆい 


の デズ 大 し ロロ エ O 〇 の OO の の 條 ぐさ ン ョ へ 


116 
まま 
118 
人 


oO09 | >」 共 ロト て と ぐー ゴゴ の の て 


ョ ー た ーー ゴナ Qo や 0 Q 


だ の だ だ CU に CSSORZOBS 


貼 ロロ す ミロ に 


に 


で 


入 1 サテ ゴロ 学 下 で 本 - の は ロゴ マサコ ロ 


ロ で こい 山 ロ すす コ ーー と 2 オキ つい で 黄 


ノ プ \N 〇 O@ の ゆる すき ゆ そ や 4 史生 古 目 の EE に コ 


に 1 


層 ざき 加 口 如 盾 ゴゴ 
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で 10 進 0 一 31 の 部 分 に つい て は 、 前 頁 の 説明 を 参照 し て 


に 


5 本 2 の クロン ジョン バベル 55 紀 居 


10 READ M ま ,K 500 DATA モー リタ ニア , ヌ アク ショ リト 
15 IF M="//" THEN 100 510 DATA マリ , 八 "マコ 

20 PRINT M$j" ノシ ュ ト ハリ 5 520 DATA セネカ ` ル , タ "カー ル 

30 INPUT ^A$ 8 530 DATA カ " ン ヒ " ア , ソン シ ” ュ ル 
40 PRINT "コタ エ = 3K 540 DATA カー 本 "へ" ル テ " 」 フ "ライ ア 
50 GOTO 10 550 DATA キネ "ニア ァ ・ ヒ "サオ 。 ヒ "サオ 
100 PRINT "も セ " ン フ " オ ワ 9 リマ シタ 。” 560 DATA キ ` ニア, コナ クリ 

110 DATA アル シラ" ェ リ ア , ア ル シ " ェ 570 DATA シエラ レオ ネ 。, フ リー タウ ン 
120 DATA リヒ " ア , ト リ ホ ? リ 580 ATA リ A へ "リア, モン ロ ヒ " ア 
130 DATA スー タ " ン , 人 ハルツーム 590 DATA コー トラ " ホ " ア ー ル , ア ヒ " シ ゾ ャ ン 
140 DATA エキ チ オセ” ア 。 ア ラ " ス ア A^" 600 DATA エミ " フ " ト , カ イロ 

150 DATA ラフ" チラ" フ " チ 610 DATA チュ ニシ"* ア 。 チ ュ ニ ス 

160 DATA ソマリ ア , モ カ " シ "シオ 620 DATA //,// 


170 DATA ケニア, ナイ ロ ヒ " 

180 DATA 9 カ " ン タ " 。 カ ン ハ ? ラ 

190 DATA ルリ ンタ " 。 キ カ " リ 

200 DATA フ " ル ン シ " , フ "シド ュ ン フラ 
210 DATA タン サ " ニア 。 タ "ルル エ ス サ ラ ー ム 
220 DATA マラ 9 ウイ, リロ ング "ウェ 

230 DATA セイ シェ ル , ヒ "クト リア 

240 DATA コモ H, モ ロニ 

250 DATA モー リ シ ャ ス , ホ ”ー ト ルイ スズ 
260 DATA マタ " カ " スカ ル , アン タナ ナリ ホ " 
270 DATA モ サ " ン ヒ "ー ク , マ フー ト 
280 DATA セキ ト " 9 キ " ニア , マ ラ ホ " 
290 DATA コン コ ", フ ラサ" ビ ” ル 

300 DATA サイ ー ル , キ ン シ ャ サ 

310 DATA アン コ " ラ 。 ル アン タ “ 

320 DATA ホ “" ツ リナ, 八 ホ "ロー ネ 

330 DATA サ " ン ヒ " ア 。 ル サカ 

340 DATA ジ " ン "フエ, ソー ルス "ペド リ 
350 DATA ミナ ミア フリ カキ ョ ウリ コク , フ "レト リア 
360 DATA レソト , マ セル 

370 DATA ス 79 シ "ラン ト ~ 」 ぬ 人 ハネ 
380 DATA カ "- ナ , ア クラ 

390 DATA オー ト ホ " ル タ 。7 カ " ト "ー ク "ー 
400 DATA トー- コ " , ロ ロメ 

410 DATA へ "ナン , 本 "ルト ノ ホ “ 

420 DATA ニシ " ェ ー ル , ニ アメ 

430 DATA ナイ シラ ^ ェ リア , ラコ" ス 

440 DATA カメ ルー ン , ヤ ウン テ “ 

- 450 DATA チャ ト " 。 ン シ “ ャ メ ナ 

460 DATA チュ ウオ 9 ウ アフリカ, ハン キ “ 
470 DATA カ か "本" ン , リ ー ブ " ル ビル 
480 DATA サン トメ ・ フ "リシン へ 7 サン トメ 
490 DATA モロ 9 コ , ラ ハバ" ト 


右上 に つづ く (国名 と 首都 名 は 中 学校 社会 科 地図 、 帝 国書 院 に よる ) 
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10 READ M$ 
20 PRINT 

30 PRINT M ま ?” ヤ 。 アア "3M ま 5) ヤ 。 「: 
40 PRINT M ま ,』"†" 

50 GOTO 10 

60 DATA マツ ラマ , メ イケ "ツマ イコ ン 


イド ーー アア ツウ シマ や キ 。 ソ マリラ マヤ 


9 で 


に 2 名 < 2 


10 REM PSE1 シ " ト " ウ ・ ハ ハン ハハ" イキ 
20 LET S=0 

30 INPUT A 

40 LET S=S+A 

っ 0 PRINT ,S 

60 IF A>0 THEN 30 

70 PRINT "アリカ "トウ コ " サ ドイ マシ タ “" 


ー 


10 REM P8SE2 コツ "カイ チョ ウ 

20 LET S=0 

30 INPUT A 

40 LET S=S+A 

50 PRINT 『" ルン e+ 
60 GOTO 30 


5 還 


10 PRINT USING'&  &"'』 "ABCD" 』"EFG" 
20 PRINT USING "性 杜 杜 "24 15,17 
30 PRINT USING" 柏 柏 . 析 ":10.32,5.64,5.66 
Sa] 
ABCDEFG 
24 4:4 ア 
ic 868 Pi 
0k 


L 
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【 10 3 フロ グラ ム PIOES =。。。。。。。。。。 訪 PiOE? の 天麻 


10 REM P10E3 sa す 承 モモ ノ オモ ナ セイ サン ケン 
20 DIM N$(15),X(15), PC15) 、 dt 
25 REM --- ヨミ コミ ーー < サン トレ タダ * カ ヒ リ ツ を 
30 READ N ーーーーーーーーーーーーーー ーー 
40 FOR 1I=1 TO NiREAD N$(1),X(1):NEXT 1 ャ マナ ラ 。 7.5 30.6 
45 REM --- サイ サン ーー ント と と 
50 S=0 前 2 作 も 、 16<7 
60 FOR 1=1 TO NiS=S+X( 1 ) :NEXT 1 有人 の 6 10.6 
70 FOR 1=1 TO NiP(I)=X1)/Sx100:NEXT 1 生き 3 
?5 REM --- ヒュ 9 シ " ーーー が 近 S 才 る 17。6 
80 PRINT ' モモ / オモ ナ セイ サン サン " 

85 PRINT セ *> コ ク 24.5 100 
90 PRINT " リン トレ タ " カ ヒ リ ウ %" 

95 PRINT " 1 


100 FOR =1 TO N 

110 PRINT N$(T)jTAB(6)} 

115 PRINT USING" 匠 村 。 拉 " 3X(1)5 
120 PRINT USING " 基 共 。 共 "PT ) 


130 NEXT 1 

135 PRINT “ [ 
140 PRINT " セ " ン コク" 3SjTAB(11)j100 
145 PRINT "一 一 ーーーーーーーー" 
150 DATA 6 


160 DATA ヤマ ナシ ,7.5, フクシマ, 5・ 2 ナカ" プ 。4 1 
170 DATA ャ マカ" タ ,2.6, オ カヤ マ , 0 .8, ソ ノ タ 。4 .3 


II 
10 REM P12E1 180 REM --- セイ リ -ーー 
20 DIM F(10) 190 5S=0O :M=0 
30 PRINT CHR$ ま (12)5 200 FOR IL=0 TO 10 
40 CONSOLE 15,5,0,1 210  S=S+FK1 ) 
50 LOCATE 0,2 220 IF FI)>M THEN M=F(1 ) 
60 FOR 1I=0O TO 10 230 NEXT 1I 
アイ: ます まま 240 CONSOLE 0,25 
80 PRINT USING " 竹 "』15 250 LOCATE M+5, 1 
90 PRINT "1" 260 PRINT " ト " ス 9" 
100 NEXT 1 270 FOR 1=0 TO 10 
110 LOCATE 0,20:INPUT X 280 LOCATE M+6,1+2 
120 IF X<0 THEN 180 290 PRINT USING"##"』F(1 ) 
130 1=INT(X/10 ) :F( 1 )=F( 1 )+1 300 NEXT I 
140  Z=X-Ix10 310 LOCATE M+2,14 
150 LOCATE F(1)+3,1+2 320 PRINT "サイ 1 
160 PRINT USING ""Z 330 PRINT USING" 析 # 幸 "38 
170 GOTO 110 340 END 
右上 に つづ く 
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I6 莉 《②.。 プログ: ラム P16E 2 


REM P16E2 7 り カレ ミチ 

CONSOLE 0,25,0,1 

DIM F(15) 

し < 

INPUT "スス ム カイ ス 9(15 マテ * )"jN 
INPUT "クリ カエ シ スウ 9"』M 

PRINT CHR ま (12)} 

AA ま =" OOOOOOOOOOOOOOOO" 


REIM ーー ヒョウ シ " ーーー 
COLOR 6 
FOR 1=N+1 TO 1 STEP -1 
PRINT LEFT$(A$, 1 ) 
NEXT I 
REIM ーー クリ カエ シ ーーー 
FOR _K=1 TO M 
X=0 : Y=0 
COLOR 4 
LOCATE 0,0:PRINT "の " 
FOR J=1 TO 10:NEXT J 
COLOR ァ 7 
LOCATE 0,0:PRINT "O" 
FOR TI=1 TO N 
U=RNDK〈 1 ) 
IF U< .5 THEN X=X+1 
IF U>=.5 THEN Y=Y+1 
COLOR 4 
LOCATE X,Y:PRINT "@" 
FOR J=1 TO 1:NEXT J 
COLOR ァ 7 
LOCATE X,YiPRINT "O' 
NEXT 1 ュ 
F(X)=F(X)+1 ぢ ? 
LOCATE X+2,YsPRINT F(X) 
NEXT _K 
REIM ーーー オ ワ リリ -ーー 
LOCATE 0,N+2 
REIM ーーー ヒス トク "ラム ーーー 
「 。 | 2 
B ま =B ま +B ま 


FOR 1I=0O TO N 
PRINT _ USING " 料 拉 栖 村 "』1sF(1)? 
K=F( [ )X50/M 
PRINT ” "jLEFT ま (B ま 。K ) 

NEXT 1 

END 
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P 2 -2 
P 2 -3 
P 2 -4 
P 2 -5 
P12-3 
P 13-5 
P13-6 
P15-3 
P16-3 
P 17-2 


の P2 2 35 $ 2 3 わす 昌和 


プロ グラ バ . ペ ー ジ 


177 
177 
178 
178 
178 
179 
180 
182 
183 
184 


顔 

ね ずみ 

いのしし 

と ら 

幹 葉 表示 

お し どり の 遊び 

ひと り 遊 び (ソリ テア ) 
ルー レッ ト 盤 

ラン ダム 曲り 

横 の 計算 (2) 


繰り 返し 模様 

パタ ー ン の GET@ と PUT@ 
quicksort の 時 間 測 定 

ピー マン の た め の 乱 数 
ピー マン の 袋 詰め (1 袋 5 個 ) 
ピー マン の 袋 詰め 

(1 袋 I50 グ ラム 以上 ) 

ピー マン の 袋 詰め 

(150 グ ラム 以上 で 最小 に ) 
A/D, D/A 変 換 の 説明 


際 ま 計 司 層 
10 REM P2-2 10 REM P2-3 
20 MIDTH 40,20 20 UIDTH 40,25 
100 PRINT" ※※※※※※※※ K 100 PRINT" ーーーー ハ へ ーーーー ハ 
110 PRINT" ※※※※※※※※※ ※ 110 PRINT' | | 二 敵 | 
120 PRINT" ※※※※※※※※※※ ※※ 120 PRINT'| 一 へ | 1 へ | 
130 PRINT* ※※※※※※※※※※ ※※※※※ 6 8BRPRIENIEDHKStISSOKDEHHE3HyS 計 で 
140 PRINT" 炎 区 ※※※※ 1 は 
150 PRINT* ※※ 0 ONEERENNNSSESIEYKeESNNMSK 23 
160 PRINT'"  ※※※ ※※※ 『" 160 PRINT'I ジ と RCStBS 3 | 
170 PRINT'  ※※ ーーー 3 170 PRINT' ~ 一 | トー 一 ン 
180 PRINT' X X 1 180 PRINT" | | 
190 PRINT'  ※※ 1] 近 る 190 PRINT" | | 
200 PRINT' ※ 1 揚 了 200 PRINT" NN の 
210 PRINT" 0 nln に 計 机 9ERSN 210 PRINT" N 。 。 ノ 一 芝 
220 PRINT" 0 0 220 PRINT" の 2 誠に アーン 652N 
230 PRINT" 0 ーーー 0 230 PRINT" ノヽ へ / 耳 / | | 
240 PRINT" 0 0 E 240 PRINT" O 一 回 =@- 男 | | 
250 PRINT" 0 0 9 250 PRINT |  。 = 語 ツク | 
260 PRINT" 000000 g 260 PRINT" EE は DWS | 
270 PRINT" 
280 PRINT* ア 人 0 に 
290 PRINT" 1 


全 P2 4 いのしし (SSC 


10 REM P2-4 
20 MIDTH 40,25 
100 PRINT"“ ト ト 
110 PRINT' SN 敵 Ni 
120 PRINT" 題 NN、 。 豆 い い 
130 PRINT* 「 5 
140 PRINT" | 4 
150 PRINT" | の @ に 
160 PRINT^ 3 
170 PRINT' 4 
180 PRINT" 重 ン 
14 
グ 4 


190 PRINT* 
200 PRINT" 
210 PRINT "し L___ 

220 PRINT^ N 

230 PRINT* SN : 
240 PRINT" N 5 
250 PRINT* ef 
260 PRINT“ 


| 


10 REM P2-5 

20 MIDTH 40,25 

100 PRINT" 

110 PRINT" 

120 PRINT* ン の N 
130 PRINT* ノン 全 、 ヽ ノ 全 、 ヽ 
140 PRINT" 22(5ROcaal Repsioenys 
150 PRINT* 4 | 

160 PRINT* と 4 回 

170 PRINT" NG | | ノ 
180 PRINT'" と に 

190 PRINT" ヽ Q Q 

200 PRINT* NN、 ア 
210 PRINT" ペ 2 
220 PRINT" に 
230 PRINT" N 

240 PRINT* ay グー 
250 PRINT* 8 で 


人 @ 12 3 幹 穫 表 示 RSE 有意 TRSEBGNOHBSEES22 人 BB 


10 REM P12-3 ミキ ハ ヒョウ シ ^ (ナラ へ " カ T ナシ) 
20 DIM F(13) 

30 PRINT CHR ま ( 12): 

40 PRINT "xxx ミキ 八 ヒョウ シ " x テ ふさ 

50 INPUT " 作 ミ "メオ ワリ 。 キ サミ "SD ,S1 .S 
60 M=(S1-S0 )/S 


70 H=0 
80 CONSOLE 17,8,0,1 
20 REM --- ミキ / ヒョウ シラ ` ーーー 


100 LOCATE 0,3 
110 FOR Y=SO TO S1 STEP 5 


次 ペー ジ に つづ く 
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120 1=INT((Y-S0 )/S ) :F(1 )=0 使い 方 
130 "PRINT USING " 析 間 拉 拉 枯 杜 "3TNT(Y/10)} 


140 GOTO 250 @ デー タ の 表示 の 範囲 と し て , 初め の 値 
150 NEXT Y S0, 終り の 値 S1,. きざみ S を 入力 し ま 
160 REM --- 八 ノ ヒョウ シ " ーーー す 。 き ざ み は 1, 2, 5,。 10 の いずれ か と 
170 LOCATE 0,20:INPUT X し , 初め の 値 は きざみ で 割り 切れ る 数 
180  Y=INT((X-S0 )/S ) に し て 下さ い 。 行 50 参 照 。 

190 IF Y<O OR Y>M THEN GOTO 440 

200  F(Y)=FC〈Y)+1 ( 例 ) 10, 100, 10 

210 Z=X MOD 10 50, 140, 10 

220 LOCATE F(Y)+7。Y+3 35. 100。 3 

230 PRINT USING "# せ "3Z 64, 88, 2 

240 GOTO 170 ト 2 ツ 

250 REM --ー キサ " ミ ==10 ーー 一 @ データ を つぎつぎ に 入力 し て 下さ い 
260 IF S=10 THEN PRINT "※|":GOTO 150 同じ デー タ が 続く とき は 2 個 目 か ら , 
270 IF S=1 THEN 330 [RETURN) キ ー を 打 て ば よい 

280 IF S=2 THEN 360 @ 幹 の 数 は 14 個 以内 で す 。 

290 REM ーー 一 ぉ =5 ーー 一 


300 IF Y MOD 10=0 THEN PRINT "|" 

310 IF Y MOD 10<>0THEN PRINT "OL“ 

320 GOTO 150 

330 REM -ーー ==1 ーー 一 

340 PRINT USING"#" INT(Y MOD 10)} 

350 PRINT "1":GOTO 150 

360 REM ==2 

370  K=INT((Y MOD 10)/2) <ーーーーー-Y MOD 10 は Y を 10 で 割っ た 余り を 
狼 出し 。 INT(x) は x を 越え な い 整 数 

390 IF K=1 THEN PRINT "t|I" を 与え ます 

400 IF K=2 THEN PRINT "fl 

410 IF K=3 THEN PRINT "s 

420 IF K=4 THEN PRINT "OI" 


0 
440 REM --- 八 ス " レ ノ ショ リ ーー 一 
450  H=H+1 
460  H1(H)=X 
470 LOCATE 0,0 
480 FOR K=1 TO H 
490 PRINT H1(K) ぅ s 3 
500 NEXT K 範囲 を 外れ た 値 は 画面 上 部 に 表示 され る . 
510 COLOR 6:PRINT “ AA ス " レ " 10 個 を 越え る と いっ た ん 検討 し て 下さ い 」 
520 COLOR 7 と 表示 され る 
530 IF H<10 THEN 170 継続 (cont 指 令 ) す る こと も で きる 
540 LOCATE 0,16 
550 PRINT "ハス " レ ヲ ラ サン トウ シテ クタ "サイ " 
560 STOP 
570 H=0O 
580 GOTO 170 
590 END 


1 


@ P13-5 お し どり の 遊び ( 送 ) BGPPGEPMDSSPDTICSRNOm TRS 


P13-5 オシ トド * リ ヶ "ー ム (5) 
ーー- マエ ショ リ ーー 二 い お 


C(30 ) @「 石 の 数 は ? 」 と きい て くる の で 
全体 の 石 の 数 を 入力 する 

"11111111112222222222 @ 黒 と 白 が まとまっ て 表示 され る 

"012345678901234567890123456789" の で , これ を 交互 に 並ぶ よう に 

" O@O@O@O@O@O@O@O@O@O@O@O@O@O@O@ する 

avioleivneo ネ ポー テン エエ ーー ニー ニキ ーー マー ニニ エマ ーー エ 8 e 二 個 ずつ 移動 する こと は これ ま 

' @@@@@@@@ ら の の @⑤@⑤@@⑤@⑤ 〇 OOOOOOOOOOOOOO で の プロ グラ ム と 同じ で す 


次 ベー ジ に つづ く 
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100 
110 
120 
125 
130 
140 
150n 
160 
170 
180 
120 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
EPS 


INPUT" イ シー / カフ 2" At2T929) "5 
IF S MOD 2 <:n THEN BEEP:GQTO 


100 


AA 還 =LEFT 生 (日 まま 、G/2)+RIGHT ま (まま SG/②) 


A 呈 =A ま +LEF (まま, 3 リー5 ) 
E ま =LEFT ま (BB,S ) 
F ま =MID ま (B ま も ,2,.5S) 
FOR 1=0 TO S-1:C(T)=1:NEXT 1 
FOR IT=S TO 29sC( 1T)=0:NEXT 1 
REM -ーー ヒョウ ミト 
PRINT Tj " テ メ " TAB(10): 
PRINT し L ま :PRINT M ま :PRINT ム ま 
REM ーーー ツテ イ ーーー 
IF INSTRC(A ま 、E ま )>0 THEN 370 
IF INSTR(A ま ,F ま )>0 THEN 37 ロ 
REM ーーー ニュ ウリ ョ ク ト チェ リク -ーー 
ENERUITSISKIS レ ジラ トッ 
IF C(J)xC(J+1 )=1 THEN 270 
PRINT "イミ カ " アリ マセ ン " GOTO 240 
INPUT "ドコ A"sK 
IF C(K)+C(K+1 )=0 THEN 30Q 
PRINT "アイ テ イマ セン " :GOTO 240 
REM -ーー イト "9 ーーー 
MID ま (A ま ,K+1 。2)=MID ま も (A ま , コ +1 2) 
MID も (A ま 。J+1 ,2)="ーー“ 
CCJD ご 08CCJF1) ミ [0 
C(K )=1 :C(K+1 )=1 
丁 =T+1 
GOTO 170 
REM ーー- セイ セキ ーーー 
PRINT 
PRINT "テキ マシ ミタ "5 
IF T>=S-1 “THEN 440 
IF T>=S/2+1 THEN 43 ロ 
PRHINT _" テン サイ 1 " :GUT ロ 4Sn 
PRINT ュ 9 ウ サイ 1”" 50T ロ 45 ロ 0 
PRINT 『" ト " リョ クシ も ヨウ" 
は 汗 ek 
GOTO 40 
END 


| 変数 の 説明 
We 


ーー と 

A$. 石 が 置か れ , 石 の 状況 を 記憶 し ます 。 
E$,F$S で き あ が り の パタ ー ン 

C 石 の 有無 を 1 と -0 で 記憶 する 配列 

S 。 石 の 個数 

f 手数 


TenT2DO 

C(J) と C(J キ 1) が と も に 1 

つま り , 両方 の 場所 (J と J+ 1 番目 ) 
に 石 が ある と . き 行 270 へ 行く 


ーー 


- 行 280 
C(K) と C(K 寺 1) が と も に 0 の と き . 
両方 の 場所 が 空い て いる と き 


| 生生 敵 | SO 放 まき 赤 ん ヽ 
| 注意 事項 | 本文 を 読ん で 下さ 
MOD, BEEP 


LEFT$, RIGHT$ 
MIDS 


行 110 
行 120 
行 140 
310 
320 
行 210 


220 


INSTR 


@P13 


10 
20 
30 
40 
50 
60 
70 
80 
20 
100 
110 
120 
130 
140 
150 
160 
170 
180 


-6 ひと り 遊 び ( ソ リ テ ア ) 


REM P13-6 ヒト リア ソ ヒ * 
DIM T(14,2),N1(14) ,X(14) ,Y(14 ) ,S(4) 
REM ーーー 
GOSUB 730:PRINT CHR も (12) 
A= "abcdefghi jk1mno" 

B ま = "ABCDEFGHTIJKLMNO " 
FORIY=0 イ 0 4 


(ソリ テア ァ ) 


は シビ 


FOR X=0 TO 4-Y 


T(K,0)=XiT(K。1 )=Y:T(K,2)=4-X-Y 
X(K )=18+3X(Y-X ) : YK )=4x(1+X+Y ) 


K=K+1 
NEXT X 

NEXT Y 

S(0)=0:S(1 )=5:S(2)=9 し ン 党 えて お く 
S(3)=12:S(4)=14 

FOR 1=0 TO 14:N1(I)=1:NEXT 1 

REM --- ハラ * メ / ヒョウ >*" ーーー 

FOR K=0 TO 14:GOSUB 650:NEXT K 


次 ペー ジ に つづ ぐ 
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配列 N1 は 石 の 有無 を 


② め 
② の の 〇 の 〇 の 6 
初め に 石 を 一 つと り 除 きま す 。 

@ 規則 : 一 つの 石 を , 隣り の 石 が ある 
と き に , その 方 向 の さら に 隣り が 空 
いて いれ ば , その あい て いる 場所 に 
動か し て , あい だ の 石 を 取れ ます 。 
ー つ だ け 残 し て 石 を 取り つく し た ら 

大 成功 で す 。 

( 例 ) G に 石 が あり , K に 石 が あっ て 

N が 空い て いれ ば , G を N に 動 
か し て K の 石 を 取れ る 。 


190 LOCATE 5,23 

200 PRINT 「 ト * コ ラ ヌキ マス カ 。 "':GOSUB 930 
210 IF X$="0' THEN 430 

220 1=INSTR(A$,X$)-1:IF 1I<0 THEN 200 
230 N1(1 )=0:K=1:GOSUB 650 

240 REM --- 7"ー ム 八 シ " メ ーーー 

250 LOCATE 5,23:PRINT "トド レラ ー ト * コ A 6 
260 GOSUB 930:LOCATE 10,23:PRINT X$j 
270  A=INSTR(A$,X$ も )-1 

280 GOSUB 930:LOCATE 17,23:PRINT X$: 
290  B=INSTR(A$,X$)-1 

300 GOSUB 440 

310 IF F=0 THEN BEEP:GOTO 250 

320 N1(A)=0:N1(B)=1:N1(C)=0 


330 K=A:GOSUB 650 石 の 位置 の 決め 方 ( 行 90 で 作り 出す) 
340 K=BiGOSUB 650 人 9 記 二 nA 4 
350 K=C:GOSUB 650 りー 0 の 
360 GOSUB 550:IF F2=1 THEN 250 Ne 0 4 
370 REM ーー- オリ ワリ ノシ ョ リ ーー 1 1 0 3 


380 N=0:FOR 1=0 TO 14:N=N+N1( 1 ):NEXT I 本 3 0 2 
390 IF N=1 THEN LOCATE 0,4:PRINT "テン サイ 「 人 1 
400 IF N=2 THEN LOCATE 0,4:PRINT “シュ 9 サイ 「" 
410 IF N>2 THEN LOCATE 0,4:PRINT 「 ホ " ン サ イ " SSC 

420 GOTO 160 BN 


1 
430 END 6 EEY 1 2 
440 REM = ニニ = ニ ハン テイ ニニ ニ 7 EET 1 1 
450 IF A<0 OR B<0 OR A=B THEN 540 Ps M 
460 IF N1(A)=0 OR N1(B)=1 THEN 540 2 は 
470 FOR 1=0 TO 2 6 5 に 
480 D= ABS(T(A, 1 )-T(B, 1 ) ) 才 : 。 
490 IF D<>0 AND D く >2 THEN 540 1 EE 2 四 9 
500 Ce (T(A, 1 )+T(B。1 ) )/2 で 一 一 あい だ の 石 の 位置 12.、M、・0 3 1 
っ 10 NEXT 1 1 は NEEDS 3 0 
520 C=M0 )+S(M( 1 ) ) :F=1 ーーーー あ い だ の 石 の 番号 (C) 同 HI 
530 IF N1(C)=1 THEN RETURN F= テ 1 なら 正 し い 手 人 も : M MM 
540 F=0:RETURN エー0 な ら ま ちがっ た 手 =4ー※ーY の 関係 が ある 。 
550 REM === ノコ リ カ " り コ "カセ ルカ ニニ ニ 
560 FOR A=0 TO 14 
570 IF N1(A)=0 THEN 630 
5S80 FOR B=0 TO 14 N 石 の 中 心 の 画面 の 位 置 
5920 IF N1(B)=1 THEN 620 (100 人 で 作り 出 3 
600 GOSUB 440:IF F=0 THEN 620 し た 0) 間 Nc2rd6AAI い 2 4 て 
610 IF F=1 THEN F2=1 :RETURN テーー「2 ニ 1 な ら ま だ 0 A 18 4 
620 NEXTB 動か せる B 5 8 
630 NEXT aA M 0 人 
640 F2=0:RETURN K KS が 
650 REM = ニニ ヒョウ シッ" ヲ カエ ル ニニ ニ 3 り 9 16 
660 X0=X(K ):Y0=Y(K ) 4 E 6 20 
670 IF N1CK)=1 THEN PUT@〈X0-1,Y0-1)-(X0+1,YO+1),U1  - 志和 SG 


680 IF N1(K)=0 THEN RY 


690 COLOR 6 2 
ィ 700 LOCATE X0,Y0O-1:PRINT MID ま (B ま ,K+1 , 1 ) ? H 15 16 
ィ 10 COLOR 7 8 12 20 


| 

720 RETURN put @ は 行 850, る 1 上 0 
了 730 REM = ニ = ニ = ニ か"ー ム / セツ メイ ニニ ニ 860 で と り だ し た 
740 CONSOLE 0,25,0,1:MIDTH 40。25 。 マー ク を 画 く 0 ト に 
750 PRINT CHR ま (12)j:COLOR 7 11 L 18 20 
760 DIM M1(10)。, ed 12 M 27 16 
ィ 770 PRINT “ 4 は ト 5 2 
780 PRINT "トナ リ / 田 園 ラ ト ヒ "コシ テ ヒト ツ サキ " ! 7 
790 PRINT “ h、 人 中 2 多 
800 PRINT 
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810 PRINT EAN 

8208PRRNT-、) ソ アキノ / 1 1 コク トイ カカ" 
830 PRINT " トレ マス 。“ 

840 PRINT “" ニン 


850 GET@(6,0)-(8,2),M1 ーーー> 上 史 この 図 を W1 に と り だ す 
860 GET@(7,4)-(9,6) MO ーーーー テ ( ) これ を WO に と り だ す 
870 PRINT 

880 PRINT サイコ" ニ イシ カ " ヒト ツ ナラ タイ セイ コウ 。 " 

820 PRINT:PRINT 

200 PRINT "RETURN キー ラ ト "9 ツ *" 

910 GOSUB 930 


220 RETURN 

230 REM = ニニ = キー ニュ ウリ ョ ク ニニ ニ = 

240 X ま =INKEY$: IF X*$="" THEN 940 
250 RETURN 


ー- 


め P15 3 ルー レッ ト 負 NRNNC ド 20BSSNSS 半 5B 晴 DERROEGS 
ar 


10 REM P15-3 ルー レッ ト 
208DUUMODGG79 お CB77SWS7D5G4692 り 
30 PRINT CHR ま も (12) 』:CONSOLE 0,25,0,1:MIDTH 40,25 
40 COLOR 7 
50 LOCATE 0,3 
100 PRINT" 人 の の の の の の 
110 PRINT" | 
120 PRINT" @ | 
130 PRINT" @ へ | ノ 人 @ 
| 
| 


140 PRINT" 億 SN 
150 PRINT' @ NN 
160 PRINT" る 

170 PRINT" の 

180 PRINT" @ と 
190 PRINT" 人 5 ジグ 
200 PRINT" 較 

210 PRINT" @ 
220 PRINT" 
230 PRINT" 
240 REM 一 八 " ン コ " ウ ょ イチ, イロ / ノ ヨミ コミ ーーー 
250 FOR I=0 TO 3 ァ 7 

260 READ P(1I),X(1),Y(1),C(1) 


270 NEXT 1 

280 DATA 0,7,0,4, 1.8,0,2, 13,9,0,1 ・ デ ー タ は 一 つの に つい て 4 個 

290 DATA 36,10.0,2,24,11 1,1,3,12,2,2 番号 , ヨコ の 位置 , タテ の 位置 , 色 符号 
300 DATA 15。13,3,1 。34。14。4。2。22。14。5。1 

310 DATA 5,14,6,2,17,14,7,1.32,14,8,2 ・ 番 号 0 が 2 つ あ り , あと は 番号 1 一 36 
320 DATA 20,14,9,1, 7,13。10」2,11,12,11,1 

330 DATA 30,11,12,2.26,10,13,1 9,9,13,2 ・ 配 列 P 番号 

340 DATA 28,.8,13,1.0,7,13,4,2,6,13,1 X ヨコ の 位置 

350 DATA 14,5,13,2,35,4,13,1,23,3,12,2 Y タテ の 位置 

360 DATA 4,2,11,1,16,1,10,2,33,0,9,1 C 色 符 号 


370 DATA 21,.0,8,2,6,0,7,1,18 
380 DATA 31.0.5,1.19.0,4,2,8 
320 DATA 12.2.2.2.29,3。1 ,1。2 
400 DATA 10,5,0,1,27,6,0,2 
410 REM -ー- ルー レト 八 " ン ーーー 
420 FOR 1=0 TO 3? 

430 COLOR CI) 

440 、X(1)=X( 1 )+5: Y( 1 )=Y( 1 )+3 
450 LOCATE X(1),Y(1I):PRINT 「@" 
460 NEXT 1I 


0.6,2 
> 1.3。1 
っ 4.0,2 
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ZAIREM たこ モカ イラ ブル "ンコ や コテ 

480 COLOR Z 

490 LOCATE 5,20:INPUT "カイ シ ノ "ンコ "9 ウ 9" 5J 
500 IF J<0 THEN 750 


510 REM --- マレ マリ ワレ ーー-- 
520 N=38 
530 M=N+RND( 1 )XNX5 そ ーーーーーーーーーーーーーー ま わる 回 数 を ラン ダム に きめ る 


540 FOR 1I=0 TO NM 

550  J=J+1:IF J>=N THEN J=0O 
5S60 COLOR ? 

570 LOCATE X(J) ,Y(J) 

580 PRINT "O'j 

9 の OUPIN ウ はら "THEN 610 

600 FOR K=1 TO 15x(15-M+1I ):NEXT K テーー 一 止ま る 前 に 減速 させ る 
610 COLOR C(J) 

620 LOCATE X(J),Y(J) 

630 PRINT "@" 

640 NEXT I 

650 REM ニー ド マ ウ クタ トキ ノ シラ ョ リ ニー ニニ 
660 COLOR C(J) 

670 LOCATE X(J) ,Y(J) 

680 PRINT "O's 

690 COLOR 7:LOCATE 20,17 

700 IF J=19 THEN PRINT “00" 
7?10 IF J<>19 THEN PRINT _P(J) ぅ 
720 COLOR C(J) :PRINT TAB(25)j "の" 
730 COLOR ? 

740 GOTO 470 

750 LOCATE 0,22 

760 END 


に = 


側 P16 3 ラン ダム 曲り NRSSMNLRRHETEEWERHSNWNENOIIOBRRNWNOWRNERSERNSS 了 3 


10 REM P16-3 ラン タ " ム マカ " リ 

20 DIM X(14),Y(14) 面 も 

30 CONSOLE 0,25,0,1:MIDTH 40,25 DA 
40 PRINT CHR$*(12)j:X=18:Y=0:COLOR 7 二 と De 
50 FOR J=1 TO 5 ゆっ 6 

60  X0=XiY0=Y た K ヽ 

?0 FOR 1=1 TO J * N 
80 LOCATE XO,YO: PRINT "へ 2  、 計 689 6 へ 
90 LOCATE X0-1,YO+1:PRINT " ノ N 「j 
100 LOCATE X0-2,Y0+2:PRINT" ノ ーー N's 
110  。X0=X0+6 人 ま し 
120 NEXT 1:X=X-3:Y=Y+3 時 2 
130 NEXT J 本 に 2 導 0SSl 
140 FOR J=0 TO 9 

150 LOCATE 2,Y0+2+J 頂点 か ら 石 が ころ が り , 曲り 訪 で 
160 FOR I テ 1 TO 6sPRINT "1 1 "3sNEXT 1 ラン ダム に (確率 半々 に ), 方 向 を 
170 NEXT J きめ ます 。 

180 LOCATE 5,Y0+2 下 の 逢 に 入っ た 回 数 が 数 えら れ ま 
190 FOR !=1 TO 5:PRINT "ピー 演 "NEXTT ます. 

200 LOCATE 0,24 32 回 を 1 組 に 4 度 繰り 返し ます 。 
210 FOR 1=1 TO 6iPRINT" ーー "jiNEXT I 

220 REM --- ラ "9 ケ ン ノ クリ カエ シラ ーーー 

230 FOR Q=0 TO 4 

240 FOR J=O TO 5:F(J)=0:NEXT J 

250 FOR K=1 TO 32 

260 REM --- ラ * ュ ン ヒ * ーー 

270 M=1 : X=18: Y= ニ ー2 : J=0 
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280 K?2=INT(RND( 1 )%X6)+1 :COLOR K9 

290 FOR 1=0O TO 4 

300 REIM 一 - ミキ " セン カ ヒ タ " リ セン カ ーー 

310 T=1 3 IF _RNDC1) く 。5 THEN =-1 <ーーー T= ニ 1 な ら 右 , T= ニ ー1 な ら 左 へ 曲がる 
320 TE 王 1 THEN  J 三 d+1 エーーーー 


330 REM -ー-- シン コウ ーーー ーー J は 左 の 逢 ( 0 番 ) か ら 数 えて 何 番 に 入る か 数 える 
340 X=X+T+(M+T )/2』Y=Y+2 6 M は 前 の 曲り 角 で の T の 値 を 保持 する 

衣 和 Say ret ーー X=X+T+(M+T)/2 は 次 の 4 行 を まとめ た も の 
370 X=X+T:Y=Y+1 :M=T の if M デ 1 and T= ニ 1 then X=X 二 2 
380 LOCATE X,Y:iPRINT "@" KK SSH ei 
390 X(2X1+1 )=X:Y(2xT+1 )=Y 4 0 hen に 志 

400 NEXT 1 if M テ ー1 and T ニ テー1 then X=Xー2 
410 FOR 1I=0O TO 4 

420 LOCATE X,Y+IiPRINT "の " 志 

430 X( 10+1 )=X:Y(10+1 )=Y+I ヽ X=X+T は 次 の 2 行 を まとめ た も の 

440 NEXT I if T=1 then X=X 十 1 

450  F(J)=F(J)+1 :COLOR 7 if T ニ ー1 then X=Xー1 


460 LOCATE J※6+3,23-Q 

470 PRINT USING" 拉 杜 " 5F(J) 

480 FOR L=0O TO 14 

490 LOCATE X(L),Y(L):PRINT " " 
500 NEXT L 

510 NEXT K 

520 NEXT Q 

530 LOCATE 0,0 

540 END 


介 P17 2 欄 の 計算 (2) NII TTSRRGRRTTNEORTGTRGGO 記 087 


10 REM P17ー2 ヨコ / サイ サン (2) 
20 REM --- ヨミ コミ ーー 一 

30 DIM X(50,?) 

40 READ P,N 

50 FOR A=1 TO N 

60 FOR 1I=1 TO P 

70 READ X(A, 1 ) 

80 NEXT Ii 

20 NEXT A 

100 REM ーー メニ ュー ーー 

110 PRINT "メニ ュー。。。 ヒ ョ ウ ノ ヨコ / サイ サン " 

120 PRINT " 1.。. レ ツ ( 1)+ レ ツ ( 」)= ニ = ニッ > レツ (k ) " 
130 PRINT " 2。。。 レ ツ ( 1)- レ ツ ( 」)= ニ = ッ > レツ (k ) " 
140 PRINT " 3。。.。 レ ツ ( i )※ レ ツ ( 」)= ニ ニッ > レツ (に ) " 
150. PRINT "4、。、 レ ツ (1) ノ レツ ( J)==> レ ツ (k ) " 
160 PRINT "5... ヒ ョ ウシ "『" 

165 PRINT " 6。。. ス 9 チ = ニ = ニッ > レツ (〈0 ) " 

170 INPUT "ナニ ヲ シマ スカ "3M2 

180 IF M2<0 OR M2>6 THEN BEEP:GOTO 170 
190 ON M2 GOTO 200,200,200,200,430 ,610 
200 INPUT "1 jk" 1,J,K 

210 IF K>P THEN P=K 

220 ON M2 GOTO 230, 280 , 330 , 380 

230 REM --- タ シ サ " ン ーーー 

240 FOR A=1 TO N 

250  X(A,K)=X(A, 1 )+X(A,J) 

260 NEXT A 

270 GOTO 100 

280 REM --- ヒキ サン ーーー 

290 FOR A=1 TO N 
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300  X(A,K)=X(A,1)-X(A。J) 
310 NEXT A 

320 GOTO 100 

SA 穫 下 MM コー5 基 上 ン ーーー 

340 FOR A=1 TO N 

350  X(A,K)=X(A,T)※X(A。J) 
360 NEXT A 

370 GOTO 100 

936 得 凍 oo サポ ウッー エー 

390 FOR A=1 TO N 

400  X(A,K)=X(A。T)/X(A。J) 
410 NEXT A 

420 GOTO 100 

OR 旧 議 ad 攻 ウシ ーーー 

440 PRINT' #" ぉ 

450 FOR 1=1 TO P 

460 PRINT USING" 析 提 揚 社 『 ぅ 13 
470 NEXT I 

480 PRINT:PRINT "一 "5 

490 FOR 1=1 TO P 

500 PRINT " 結 

510 NEXT 1 

520 PRINT 

530 FOR A=1 TO N 

540 PRINT USING" 拉 桂 『3 人 5 
550 FOR 1=1 TO P 

560 PRINT USING "欄間 拉 寺 村 " 3X(A。1)5 
570 NEXT 1I 

580 PRINT 

520 NEXT A 

595 PRINT "し レツ (0)="jC 

600 GOTO 100 

610 INPUT" ス 9 チ "jC 

620 FOR A=1 TO N 

630  X(A,0)=C 

640 NEXT A 

650 GOTO 100 

QOS NR 提 NN さこ ーー チバ ニダ ニニ ー 

670 DATA 2,3 

680 DATA 20,15 

6920 DATA 40,25 

700 DATA 60,20 

10 END 


か Ya ] 


旬 P20-2 紹 り 返し 模様 半 に KNOS 症 NR ERRIORESIRSER か 


際 REM P20-2 クリ カエ シ モヨ 9 
20 DIM P*(10),G(25) ,K(25) 0 
30 CONSOLE 0,25,0,1:MIDTH 40,25 本 文 に あり ます 。 


40 M=10:N=10:C ま ='pcds 

50 C=7: 19=1: J②=1: J3=1 
60 F ま ="& &" 

70 FOR 1=1 TO M 

8 ER 還 (L) 二 衝 作 ぶら っ 
20 NEXT 1I 

1 コー (8 

110 CONSOLE 0,25:LOCATE 0,18:COLOR 7 
120 FOR I=18 TO 24 

130 PRINT 

140 NEXT Ii 


次 ペー ジ に つづ ジミ 


185 


760 
770 


PRINT "一 一 ーーーーー メニ ュー --ーーーーーーーー" 
PRINT "p( 作 ? タ ー ン ) c( イ ロ ) d( ヒ ョ ウシ " ) =( サ イス * ) " 
INPUT J ま 
H=INSTR(C ま , J ま ) 
IF H=0 THEN BEEP:GOTO 170 
ON H GOSUB 220,380 ,600,740 
GOTO 110 
REM = ニニ = 八 ? ター ン / ヨミ コミ = ニニ = 
GOSUB 810 
FOR 1=1 TO M 
FOR J=1 TON 
LOCATE J-1 , 1-1 
X ま =INKEY$ ま : IF X ま ="" THEN 270 
IF X ま <>"b" THEN 330 
J=J-1: IF J<>0 THEN 260 
J=N : 1=1-1 : IF 1<>0 THEN 260 
GOTO0 240 
IF X ま $="b" THEN 260 
PRINT X$ 
MID ま も (P ま ( 1 ) ,J, 1 )=X ま 
NEXT J 
NEXT I 
RETURN 
REM === イロ / シテ イ == ニ = 
PRINT "イロ / ノ シテイ メニ ュー" 
PRINT "1( セ "ンタ イ オナ >" ) 「* 
PRINT "2( 八 "ターン ノ ま " ョ ウ コ " ト ) " 
PRINT "3( タ テ ノ クリ カエ シ コ " ト )" 
INPUT J3 
IF J3<0 OR J3>3 THEN BEEP:GOTO 430 
ON J3 GOTO 460,490,540 
REM -- イロ セン タイ ーー 
INPUT "イロ "iC 
RETURN 
REM -- 八 ? タ ー ン / ノ キ " ョ ウ コ " ト ーー 
FOR 1=1 TO M 
PRINT Ii" キ " ョ ウメ "jiINPUT G(1) 
NEXT I 
RETURN 
REM -- クリ カエ シ コ " ト - 一 
FOR 1=1 TO 1I9 
PRINT "タテ / クリ カエ シ ダイ "Ti "| カイ "5 
INPUT KK(1 ) 
NEXT I 
RETURN 
REM === ヒョウ シ " = ニニ = 
PRINT CHR$ ま (12) 
COLOR C 
FOR 1=1 TO 1I9 
IF J3=3 THEN COLOR KK(1 ) 
FOR 11=1 TO M 
IF J3=2 THEN COLOR GK(I1) 
FOR J=1 TO J9 
PRINT USING F ま :P$( 11 ) 
NEXT JiPRINT 
NEXT 1I1 
NEXT 1 
IF INKEY ま ="" THEN 720 
RETURN. 
REM = ニニ = サイ ス " / ヘン コウ ニニ = 
INPUT " 八 ? タ ー ン / ノ ヨコ ノ メカ ス " "jsN 
INPUT "用 "ター ン / タテ / タダ "ンス 9" 1M 
J9=INT( 38/N ) 
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パタ ー ン は 左上 か ら ヨ コ の 行 
ご と に 順に 入れ て いき ます 。 
B] キー で 後退 で きま す 


780 19=INT(24/M) 

790 F$="&"+STRING ま $(N-2。" の う +&" 
800 RETURN 

810 REM 

820 LOCATE 0,0 

830 FOR 1=1 TO M 

840 PRINT USING F$jP ま (1) ぉ 
850 PRINT "1" 

860 NEXT I 

870 FOR J=1 TO N 

880 PRINT "一 ' 

820 NEXT JiPRINT “+" 

200 RETURN 


REM P20-3 "ターン / GET ト PUT 0 2 
20 DIM P*(10),AX( る 4) ーー 
30 CONSOLE 0,25,0,1:UIDTH 40,25 

40 REM --- ターン ノ ヨミ コミ ーーー 

50 READ M,N 

20 PRINT CHR$(12)。 

70 FOR J=1 TO M 

80 READ P*(J):PRINT P*(J) 

20 NEXT J 

100 REM --- クリ カエ ラ ーーー 

110 19=INT(25/M) :J9=INT(38/N) 

120 GET@ (0,0)-N-1,M-1 ) ,A% 

130 LOCATE 0,24:INPUT イ ロ ':C 

140 COLOR C:PRINT CHR$(12)。 

150 FOR I=0 TO 19-1 

160 FOR J=O TO J9-1 

170 。Y=IxM:X=JxN 

180 PUT@ (X,Y)-(X+N-1,Y+M-1),A を 

190 NEXT J 

200 NEXT 1 

210 GOTO 120 

220 REM --- ターン ーー 

230 REM タテ トコ ョ コノ) カス" 

240 DATA 4,6 
250 REM /" タ ーッ 
260 DATA "ンマ ww 
270 DATA "へ ムン 
280 DATA ' キ キキ キキ 
DATA " 


旬 P22 4 quioksot の 時 問 測定 を 昌 8 間 NNIRBERNIEESIIININIBIRIIEIIRIIIIIDID 


10 REM P22-4 quicksort / シシ "カン ソ ク テ イ 
20 DIM X(1000 ) ,K0( 20 ) ,K1(20 ) 

30 READ N 

40 PRINT "quicksort" 

50 IF N=0 THEN STOP 

60 PRINT " テ "ー タ / ノ コス 9=" jiNs 

70 FOR 1=1 TO N 

80  X(1I)=INT(RND( 1 )*100 ) 

20 NEXT 1 

100 REM --- ナラ へ "カエ ハシ" メ ーーー 
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@ P23-3 ピー マン の た め の 乱 数 


TIME ま ='00:00:00" 

GOSUB 190 

PRINT "ショ ヨウ シ " カ ン ="?TIME ま 

REM FOR 1=1 TO N 

REM PRINT X(1): 

REM NEXT I 

GOTO 30 

DATA 100,200,500 ,1000,0 

REM === quicksor 七 ニニ ニ = 

K=1 :K0O( 1 )=1 :K1(1 )=N 
L=KO(K ) : R=K1(K ) :K=K-1 

[=L : J=R : り =X((LTR )/2 ) 

IF _X(1) く MM THEN エエ =1+1 :GOTO 230 

IF M く <X(J) THEN J=J-1:GOTO 240 

_ IF 1<=J THEN MO=X( 1 ) : X( [ )=X(J) :X(J)=MO : 1= エ +1 : コミ Jー1 
IF 1 く <=J THEN 230 

IF J-L>=R-1 THEN 310 

IF I<R THEN K=K+1 :KO(K )=1:K1(K)=R 
R=J 

GOTO 330 

IF L く J THEN K=K+1 :KO(K )=L :K1(K )=J 
L=1 

IF L く <R THEN 220 

IF K<>0 THEN 210 

RETURN 

END 


実行 例 ( デ ー タ に よっ て 所 要 時 間 は 変動 し ます ) 
1 で に SOF 

テ "ー タ / コス 9= 100 ショ ヨウ シ " カ ン =00 00 : 17 
qu1c に or 

テ "ー タ / コス 9= 200 ショ ヨウ "カン =00 : 00:35 
qu り 1 で に or モ 

テ "ー タ / コス 9 ウ = 500 ショ ヨウ シ " カ ン =00:01:36 
qu1C に =oF モ 

チ "ー タ / コス 9= 1000 ショ ヨウ 人 


180 
1920 


REM P23-3 ヒ "- マ ン / ノ タメ / ラン ス 9 P23-3 か ら P23-5 は ほとん ど 同 じ 構 造 の 
DIM F(300) 8 プログ ラム で す 。 比 較 し て みて 下さ い 。 
INPUT"n ト ショ キチ "ijN,Y run 直後 , 配列 F な どの 変数 が ゼロ に さ 
X=RND( 一 Y ) れる こと を 使っ て いま す 
FOR 1I=1 TO N 

GOSUB 330 

IF X<0 THEN PRINT X:GOTO 60 

F(X)=F(X)+1 ーーーーーーーーX グラ ム が 何 回 あつ た か 数 えま す 。 
NEXT 1 

Hb=STRING6 ま (100 。" 較 ") . <ーーーーーーー- 硬 を 100 個 つなげ た 文字 列 を H$ に 作り ます 。 


FOR K=0 TO 300 
IF F(K) く >0 THEN 140 TO てら で ロ で な 々 い 本 を いす 
NEXT K 
K1=K 
FOR _K=300 TO 0 STEP -1 + 


F(300) か ら 逆 に 見 て 初め て ゼロ で な い 要 棄 を 


IF F(K) く <>0 THEN 180 見 い 出す . 


NEXT K 
K2=K 
隊 RHNHTSGTSPEPY ジ ーッ ソ ダボ ソラ ウジ スリ 「 1 


ペー ES うこ 
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-PRINT ="3N 
FOR _K=K1 TO _K2 
PRINT KiTAB(4)jLEFT*$(H ま ,F(K) )jF(K) 
NEXT K 
S=0 : =0 
FOR K=K1 TO K2 
S=S+K※F て (K ) : =T+KXK※F(K ) 平均 と 標準 偏差 を 求め る 
NEXT K 
M=S/N:S1=SQR((T-SXM )/(N-1 ) ) 
PRINT 
PRINT "ヘイ キン =" 』Mi "ヒョウ シラ" ュ ン ヘン サ = ド 3 ら 1 
PRINT "ショ キチ =" ぉ 3Y 
STOP 
REM = ニ = ニ = ヒ ?ー マ ン ラン スウ ニニ ニ 
U=0 
FOR L2=1 TO 12 
U=U+RNDK( 1 ) 
NEXT L9 
X=INT(UX8-18 ) 
RETURN 
END 


@P23-4 ピー マン の 袋 詰め (1 袋 5 個 ) 人 細 還 還 間 間 間 間 間 間 間 間 間 間 間 間 昌 間 昌 間 間 


REM P23-4 ヒ "- マ ン / フク ロ ツ *" メ (コス 9 ら 5) 
DIM F(300 ) 
INPUT"n ト ショ キチ "jN,Y 
X=RND( -Y ) 
FOR 1=1 TO N 
S=0 
FOR J=1 TO 5 
GOSUB 330 
IF X<0 THEN PRINT XiGOTO 60 


H ま =STRING ま (100, "一 ') 
FOR K=0 TO 300 
IF F(K)<>0 THEN 140 
NEXT K 
K1=K 
FOR K=300 TO 0 STEP -1 
IF F(K)<>0 THEN 180 
NEXT K 
K2=K 
LPRINT "ヒマ ン ノ フク ロ ツ * メ (コス 9 5)"』 <ーーー 機 種 X で は 印字 機 ( プ リン タ ) が 使え る と き , 
LPRINT " N='sN print 婦 を LPRINT に か える と 印字 機 に 印刷 で き 
FOR K=K1 TO K2 
LPRINT KiTAB(4) 3LEFT ま (H ま ,F(K) ) jF(K) 
NEXT K 
S=0 : =0 
FOR _K=K1 TO K2 
S=S+K※xF(K ) : =T+KXKXF(K ) 
NEXT K 
M=S/N : S1=SQR((T-SXM )/(N-1 ) ) 
LPRINT 
LPRINT "ヘイ キン =" j』M 
LPRINT "ショ キチ ='』 
STOP 


3 ヒョウ シミ" ュ ン ヘン サ =" 3S1 
MA 


次 ペー ジ に つづ く 
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| 330 REM === ヒー マン ラン ス 9 = ニニ 
340 U=0 

350 FOR L9=1 TO 12 

360  U=U+RNDK1 ) 

370 NEXT L9 

380 X=INT(Ux8-18 ) 

390 RETURN 

400 END 


| に デ 


⑯ P23-5 ビー マン の 袋 詰め (1 袋 150 グ ラム 以上 ) 還 還 還 EE 


ORENM 、P23= ニ 5 ES ニー マ ツン ノ フク ロリ ^X(150gF イシ" ョ ウ ) 
20 DIM F(300 ) 
30 INPUT"n ト ショ キチ "jiN,Y 


40 X=RND( -Y ) 
50 FOR 1=1 TO N 
51 S=0 


52 FOR J=1 TO 10 

60 GOSUB 330 

70 IF X<0 THEN PRINT Xi:GOTO 60 
72  S=S+XiIF S>=150 THEN 80 

74 NEXT J 

80  F(S)=F(S)+1 

84  M=M+J 

85 LPRINT J』 

20 NEXT I 

95 LPRINT 

96 LPRINT " コ "9 ケイ コス 9 ="'jM 

100 H ま =STRING ま (100,"' 田 ') 

110 FOR K=0 TO 300 

120 IF F(K)<>0 THEN 140 

130 NEXT K 

140 K1=K 

150 FOR K=300 TO 0 STEP -1 

160 IF FCK)<>0 THEN 180 

170 NEXT K 

180 K2=K 

190 LPRINT " ヒ ? マ ン ノ フク ロ ツ * メ (150gF イ ミ " ョ リウ ) " 
200 LPRINT " N="'ziN 

210 FOR K=K1 TO K2 

220 LPRINT KjTAB(4)jLEFT ま (H ま ,FK(K ) ) jF(K ) 
230 NEXT K 

240 S=0:T=0 

250 FOR K=K1 TO K2 

260  S=S+K※F(K ) : =T+KxKxF(K ) 
270 NEXT K 

280 M=S/N:S1=SQR((T-SxM)/(N-1 ) ) 
2920 LPRINT 


300 LPRINT "ヘイ キン =" 3Mi "ヒョウ シ " ュ ン ヘ ン サ =" 』S1 
310 LPRINT "ショ キチ ="jY 

320 STOP 

330 REM ニニ = ヒー マン ラン スウ ニニ = 

340 U=0O 


350 FOR L9=1 TO 12 
360  U=U+RND( 1 ) 
370 NEXT L9 

380 X=INT(UX8-18 ) 
320 RETURN 

400 END 


介 P23-6 ピー マン の 袋 詰め (150 グ ラム 以上 で 最小 に ) 


10 REM P23= 150gr イシ ” ョ ウ ナド サイ ラ ョ ウ 
20 DIM F(200),B(11),P(11),Q(10),X(10) 


30 INPUT "nh ト ラミ ョ キチ "jN,Y で ーーーーーーー N は 袋 の 数 , Y は 適当 な 数 (例え ば , 

40 INPUT " イ ゅ カイ ニニ 人 カル コス 9"jM 830309) を 入力 し ます 。 

50 X=RND( -Y ) :P(M+1 )=0 :B(M+1 )=0 

60 FOR 1=1 TO MizQ(I)=1:NEXT I も 

ィ 70 FOR A=1 TO N M は 1 回 に は か る ビー マン の 個数 (7 か 
80 FOR 1=1 TO MzB(1I )=0:P(1I)=0:NEXT I 8 に し ます )。 

90 FOR 1=1 TO M 

100 IF Q(I)=0 THEN 140 

110 GOSUB 530:R=R+1 隊 和 っ 

120 IF X<0 THEN PRINT X:GOTO 110 B 2 進 問 

130 IF Q(I)=1 THEN X(1)=X 5 寺 さ を は が る バタ ニン) 位 が 1 の も の を 
140 NEXT I 袋 に 入れ る 

150  S=0O:iS0=200 :PRINT Ai "カイ" "ri 0 

160 FOR J=1 TO 2^M-1 Q eo 
170 FOR K=1 TO M 

180 IF B(K)=0 THEN B(K)=1:GOTO 210 

190 B(K)=0 


200 NEXT_K 

210 P(K )=1-P(K ) 

220 IF P(K)=1 THEN S=S+X(K ) 

230 IF P(K)=0 THEN S=S-XK(K ) 

240 IF S>=S0 OR S<150 THEN 270 

250 S0=Si IF S=150 THEN 280 

260 FOR 1=1 TO MiQ(I)=P(1)sNEXT 1 ーーー 一 一 最良 の 組 を Q に 保存 する 。 


NEXT J 
280 FC(SO)=F(SO )+1 
290 NEXT A 
300 H ま =STRING ま (100," 較 ") 
310 FOR K=0 TO 200 
320 IF F(K)<>0 THEN 340 
330 NEXT K 
340 K1=K 
350 FOR K=200 TO 0 STEP -1 
360 IF F(K)<>0 THEN 380 
370 NEXT K 
380 K2=K 
390 PRINT Mji' ] コ / ナカ カラ ユエ ラフ" 「 5 
400 PRINT "フク 2 ロ ノ カス "="jN 
410 FOR K=K1 TO K2 
420 PRINT KiTAB(4)jLEFT ま (H$,F(K) ) FCK) 
430 .NEXT K 
440 S=0:T=0 
450 FOR K=K1 TO K2 
460  S=S+KXF(K ) : =T+KxKxF(K ) 
470 NEXT K 
480 M=S/N:S1=SQR((T-SxM)/(N-1 ) ) 
490 PRINT 
500 PRINT "イキ ン =" jMj "ヒョウ シラ" ュ ン ヘン サ =" 5S1 
510 PRINT "ショ キチ ="jYj" シ ヨウ ラン スウ 'jR 
520 STOP 
530 REM === ヒ ?ー マ ン ラン スウ ニニ = 
540 U=0 
550 FOR L9=1 TO 12 
560  U=U+RND( 1 ) 
570 NEXT L9 ヶ 
580 X=INT(Ux8-18 ) 
590 RETURN 
600 END 
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人 @P25-2 A/D,D/A 変 換 の 説明 ER 】 


10 REM P25-2 A/D,D/A ペン カン ノ セツ メイ 
20 DIM Ac(80 ) ,D(80 ) 
30 INPUT'A1,F1,A2,F2" iA1,F1 ,A2,F2 4 
40 PRINT CHR$(12)。 itc 

50 CONSOLE 0,25,0,1:MIDTH 40,25 TP 

60 S=10/(ABS(A1 )+ABS(A2 ) ) 

70 LOCATE 0,11 Mi 必 の 

80 PRINT " 十 ':STRING$(37。"ー")』" 十 " 欠 

の 0 REM --- ナミ / ハウ セイ ーーー 

100 COLOR 4 * 波 の 発生 

110 FOR IT=0 TO 360 STEP 10 y テ aisin(fix) 十 a>sin(fsx ) 
120 Y= At1xSIN(F1xIx3.14159/180 ) を 10 度 間隔 に 抽出 

130  Y=Y+A2xSIN(F2xIx3.14159/180 ) 

140 LOCATE 1/10+1 ,-INT(YxS+ 。5)+11 

150 PRINT'O': 

160  A(I/10)=Y 

170 NEXT 1 

3 幸人 EEM ーー AZ/D ヘン カン ーーー @ 本 廊 (25 回 ) の 図 と 比較 し て 下さ い 
190 COLOR 7 

200 D1=A(1)-A(0):LOCATE 1,22 

210 IF D1>=0 THEN D(0)=1:PRINT " 画 " 

220 IF D1<0 THEN D(O)=0:PRINT "-" 

230 FOR T=1 TO 36 

240  D1=A(T)-A(T-1 ) 

250 IF D1>0 THEN D(T)=1 

260 IF D1=0 THEN DCT)=DT-1 ) 

270 IF D1<0 THEN D(T)=0 

280 LOCATE T+1 ,22 

2920 IF D(T)=1 THEN PRINT " 還 ': 

300 IF D(T)=0 THEN PRINT "ー": 

310 NEXT T 

320 REM --- D/A A ン カン ーーー 

330 Y=11:P ま = リノ" 

340 IF DO)=0 THEN P*="' ヽ " 

350 LOCATE 1,Y:PRINT P* 

360 FOR T=1 TO 36 

370 IF DKT)=D(T-1 ) THEN 420 

380 IF P*$=" ノ '" THEN P* ま ="N':GOTO 400 

390 IF P*=" ヽ N' THEN P ま =" ノン" 

400 LOCATE T+1 ,Y:PRINT P* 

410 GOTO 450 

420 IF D(T)=1 THEN Y=Y-1 

430 IF D(T)=0 THEN Y=Y+1 
_440 LOCATE T+1,Y:PRINT P$ 

450 NEXT T 

460 LOCATE 0,23 

END 


e 
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娘 夢 知 時 普 意 は 
: 中 り 間 段 外 じ 
adr の TA の 
2 な い 少 釘 奥 た 
際 26 和 な の いひ 
大 ら 探 っ 
2 だ られ そ た 

な "る 面 け 


ィ ァ 


TX2 多 
ディ ト 
o ン 4 
Sp 


成長 する パソ コン 


カラ ー デ ティ スプ レイ C14 -1180 \98.000 
ー、 カラ ー ア ダ プ ターMP-1710…\10.000 


MB-6885 \89,.800 4NINT) 拡張 RAM MP-9785……… \30,000 


くら し を 豊か に … 
「 日 立新 技術 シリ ー ズ 」 
日 立 の 新 技 術 ・ 新 アイ デア か ら 生ま れ 
た 、 代 表 商 品 で す 。 こ の 基本 技術 は 


Fe R こ WEST うー 
7 万 立 クア 0 ー/ 陸 4 ター に 共通 


品質 を 大 切 に する < 技術 の 日 立 > 


日 パー ソナ ルコ ン ピ ビュー ダー 
人 HITACHI 


生活 と 技術 を むす ぶ 


日 立 家電 販売 株 式 会 社 


〒!05 東 京都 港 区 西新 橋 2-!5-!2( 日 立 愛 客 別館 )TEL(03)502-2111 
護 商 品 の お 問い 合わ せ 、 ク レジ ッ ト の ご 相談 、 カ タロ グ の ご 請求 は お 近く の 日 立 の 家電 品 取扱 
店 へ お 気軽 に どう ぞ : 支 日 立 ベー シッ クマ スタ ー に は 保証 書 が つい て いま す 。 ご 購入 の 際 に は 
必ず 記入 事項 を ご 確認 の うえ 、 お 受取 り に な り 、 大 切 に 保存 し て くだ さい 。 


、 Paeket 


制御 ・ 技 術 計 算 に 高速 性 能 は か か ヵ * せな い 。 
7 ン リ ツ の Packet II は 、Pascal と アセ モン ブラ で お 人 


制御 に 強い 計測 ・ 産 業 機械 分 野 で 多く 望ま れ て いた 高 休 計 算 に 強い PacketII は 、 模 準 OS、 DCSD』# Fascal 
速 処理 、 リ アル タイ ム 処 理 、 大 容量 デー タ 処 理 の ニー ズ IV.0 が 使え る た だ ため Pascal や FORTRAN が Me 市 
に 、 今 アン リツ は Packet II で お 応え し ます 。 メ イン CPU 販 の アプ リケーション ブロ グラ ム が 容易 に 活用 て - き ます 


68000 に リア ル タ イ ム 処 理 用 0S を 搭載 。 割 込 処理 機能 を 。 その う ぇ 、 生 産 性 、 保 守 性 の すぐ 寺泊 セン 
重視 し た 拡張 BASIC と 、 これ に リン ク す る アセ ンプ ブラ を ング 言語 Pascal は 、BASIC の 約 10 倍 の 高速 処理 を 実 
サポ ー ト し て いま すき さらに 、 拡張 BASIC は 構造 化 ス テ 現し て いま す 。 これ ま て 、 複雑 で 長い 時 間 を 必要 と し て い 
ー ト メン ト が 充実 し て いる ほか 、 制 御 に IN 並列 処理 た 大 量 デ ー タ の 計算 0 で 処理 、 より 効率 的 な 技 
機能 も 備 を て いま す インタフェース に お いて も 、GP-IB、 術 計 算 を 可能 に し て いま す ,。 また 、 FORTRAN に よる フ 


シリ アル ル 6、16 ビ ピット パラ レ と 6 は 電 褒 で ] 機 汽 の 制 ログ ラム を 作成 され て いた 方 に も 、 す ぐ ぉ 役に立ち ます 
作 、 演 算 、 分 析 、 解 析 な ど 専 門 的 な 処理 に 強 る を 発揮 し ます (UCSD Pascal: カ リフ ォ ル ニア 大 学 理事 会 の 登録 商 醒 ) 
Hy PERSONAL COMPUTER 


Packet ピ 1 制御 用 に 0OEM を お すす めし ます ング 


3 東京 都 港 区 南麻布 BR 4 電話 e03 -446- 1111 計測 器 営業 部 


6 】 名 古屋 支店 @052-58 関西 支社 @06-372-0521 福岡 支店 @092-471-7655 


絡 用 エスカレート 。 


スー パー・ マ イィ イコン ABC-64、 6 ai-M1H6 


電 


高級 言語 の すべ て が 
使え て 


フォ ー ト ラン ・ コ ン パ イラ (JIS-7000 プ ラス ) 、 
ー シ ッ ク ・ イ ンタ プリ タプ コン パイ ラ 、 ア セン ブ 
ラ 言 語 な ど を 標準 装備 し 、 さ ら に オプ ショ ナル と 
し て コ ポ ボル ・ コ ン パ イラ 、C コ ン パ イラ 、 パ スカ 
ル 、PL/3 な ど が すべ て 使え ます 。 ま た 、 こ れ ら の 
高級 言語 を 使用 し た アプ リケーション ・ ソ フト ウ 
ェ ア ・ パ ッ ケ ー ジ も 数 多く 用 意 さ れ て お り 、 科 学 
技術 計算 用 と し て 各種 統計 解析 用 パッ ケー ジ 、 ビ 
ジネス 用 と し て 販売 管理 ・ 在 庫 管理 ・ 財 務 会 計 他 各 
種 、 計測 ・ 制 御用 と し て 各種 入出 力 制 御 パ ッ ケ ー ジ , 


べべ 


デー タ 通 信 プ ロト コル 
TSSE、RJE -BSC 


TSSE お よび RJE / BSC 各 種 プ ロト コル ・ エ ミュ レー 
に より 各種 大 型 ホ スト ・ コ ンピュータ と の デー 
タ 通 信 や 分 散 処理 用 に 利用 する こと が で きま す 。 
大 型 コ ンピュータ の 大 容量 、 高 速 処理 機能 を ABC 
-24、26 上 で 手軽 に 、 し か も 短 時 間 で 実現 で きま す 。 
TSSE プ ロト ルコ ・ エ ミュ レー タ 
IBM-3780 プ ロト コル ・ エ ミュ レー タ 
IBM-3270 プ ロト コル ・ エ ミュ レー タ 
IBM-3741 プ ロト コル ・ エ ミュ レー タ 


77 寺 77) 


IBM DOSK は 国際 性 と 汎用 性 の 面 か ら 、IBM デ ィ ス 
ク ・ フ ォ ー マ ッ ト と 互換 性 を と る た め に 開発 され 
た ファ イル 交換 プロ グラ ム で す 。 ABOC-26 上 で IBM 
形式 に ディ スケ ッ ト を イニ シャ ライ ズ す る 機能 、 
IBM ディ スケ ッ ト 上 の ディ レク トリ を 見 る 機能 、 
IBM ディ スケ ッ ト 上 の ファ イル 内 容 の ダン プ 機 能 、 
違っ た モー ド で の ファ イル 交換 機能 、IBM ディ ス 
ケッ ト の ファ イル 消去 機能 、DOSKET と IBM 間 の 双 
方 向 の ファ イル 交換 機能 、 他 。 


従来 の 簡易 言語 は コマ ンド (プロ グラ ム の 命令 語 ) 
数 が 多く て 、 コ ンピュータ の 初心 者 に は 使い こ な 
せな いと の 声 が 多く 聞か れ ま す 。SIMPLE-ONE は 
コマ ンド 数 を で きる だ け 少 な くし (60 ヶ )、 し か も 
拡張 性 を 重視 し た 設計 思想 で 、 初 心 者 か ら プ ロフ 
ェ ッ ショ ナル ま て で 幅広 い 分 野 で 手軽 に 使え ます 。 
グラ フ 表 示 機能 、 ソ ー ト 機能 、 条 件 検索 機能 、 四 
則 演 算 機能 、 他 。 


易 言語 

EASY-PRO 
EASY-PRO は コマ ンド が 全く な い 本 格 的 な ブロ グ 
ラム ・ レ ス の デー タ ・ フ ァイル 管理 プロ グラ ム で す 。 
操作 は すべ て CRT 画 面 に 表示 され る ヘル プ ・ メ ニ 
ュー に より 番号 を 入れ る だ け 。 導入 し た その 日 か 
ら 、 コ ンピュータ の 知識 の 全く な い 人 で も 、 す ぐ 
に 使い こなせ ます 。 
デー タ 検 索 機 能 、 条 件 検索 機能 、 デ ー タ 訂正 お よ 
び 削 除 機能 、 四 則 演 算 機能 、 ソ ー ト 機能 、 他 。 


強力 16 ビ ピット ・ マ イコ ン ai-M16 は ABC-24、26 の 上 
位 機種 と し て 、16 ビ ッ ト ・ マ ル チ CPU に より 、 高 
速 ・ 大 容量 ・ 多 重 処理 を 実現 し た この クラ ス 最 上 
位 に 位置 する 高 性 能 コ ンピュータ で す 

メイ ン CPU に は 8086、I|/O の CPU に 8089 を 採用 し 
た 16 ビ ッ ト ・ マ ル チ CPU 構 成 と な か っ て お り 、 ま た 、 
512K バ イト の RAM、7.8M バ イト の ウィ ンチ ェ ス タ ・ 
ディ スク ・ メ モリ 、1M バ イト の フロ ッ ピ ・ デ ィ ス 


ク ・ メ モリ (いずれ も 大 容量 ) を 標準 装備 し て いま す 。 


高 性 能 の 評価 を 世界 に 定着 させ た 


了 イ 二子 湖 共 株 式 会 社 


本 社 ・ 工 場 〒|46 東京 都 大 田 区 下丸子 2 丁目 28 番 16 号 


容 03-756-41II( 代 ) 


e ABC-24、26 お よび ai - M16 に 関す る お 問合せ 、 資 料 請求 は 東京 営業 所 まで 。 


東京 営業 所 〒!05 東京 都 港 区 新橋 2- 12-| ラン ディ ッ ク 第 3 新橋 ビル 容 03-595-1I32I( 代 ) 
大 阪 営業 所 〒530 大 阪 市 北 区 梅田 !-!-3-I100 谷 06-345-2821( 代 ) 


筑波 営業 所 〒305 茨城 県 新治 郡 桜 村 吾 妻 3-10-| 松見 ビル 
富士 工場 〒410-|3 静岡 県 駿東 郡 小山 町 須 走 495 


会 0298-52-1856( 代 ) 
会 0550- 5 -3851( 代 ) 


, な 技術 で 放 


この 顔ぶれ 、 い よい よ 面 軸 な つて で きた 。 


NEC の パッ ュ ン 多彩 な 機種 が を ろ っ て 、 さ ら に 可能 性 が ひろ が り ま し た 。 ど れ を 選ぶ か 
どこ まで 面白 くす る か は あな た 次 第 。 ま ず は 、 実物 に ふれ て 試し し みて いた だ きた だ たい, 
Bit-INN、 マイ コン ショ ッ プ "で は 、 話 題 の 4 機種 を 中 心 に 、 周 辺 機器 ・ 
ソフ トウ ェ ア に いた る まで 情報 が 豊富 。 お 問い 合わ せ 、 ご 相談 に も 
お こ だ え し て いま ま お 気軽 に 、 ど うる 


N5200U モ ョ LDH5 


@ シ ステ ム 標 準 価格 ……698.000 円 


(ディ スプ "レイ 、 キ ー ボ ー ド フロ ッ ピ イデ イス ク 1 友 ) 


PC-8800 ヨ リー ズ ~ 


@ 本 体 標準 価格 ……… 228,000 円 


PC-8000 ヨ リー ズ 


@ 本 体 標 準 価格 ……… 168.000 円 


PC6000 ヨ リー ズ ~ お 問い 合わ せ は 、NEC 及 び 最 寄り の Bit-INN、 


@ 本 体 標準 価格 ………89.800 円 NEC マ イコ ン シ ョ ッ プ 、 NEC 商 品 販売 帆 へ 。 


人 に 
A あ C の パパ ジフ ン フ ァ ミ ケー 9 
各 iKINN TOKYO シス テム セン ター 穫 放 NN OSAKA シ ステ ムセン ター 最 放 INN NAGOYA シス テム セン ター 最 旗 INN YOKOHAMA シス テム セン ター 


〒I0| 東京 都 千 代田 区 外 神田 |-15-I6 〒542 大 阪 市 南 区 難波 千日前 13-|| 〒460 名 古屋 市 中 区 大 須 4-||-5 〒220 横浜 市 西区 北幸 |-8-4 
ラジ オォ 会 館 7F 谷 03(255)4006、4575 一 6 マス ザキ ヤ ピ ビル 4・5・6F 容 06(647)2747 一 8 杏林 殖産 ビル 2F 容 052(263)0971 横浜 西口 第 2 ミナ トビ ル 7F 容 045(314)7707 一 9 


AMEC マ イコ ン シ ョ ッ プ @ (札幌) 大 阪 屋 容 (011)22!-018|/ シ ステ ムイ ン 札 幌 大 (01)222-4645/ パ ソコ ン ロ ビ ーNTK 札 幌 大 (011)26!-8800 @ (函館 ) シス テム イン 南北 海道 枯 (0138)22-7188 (帯広 ) シス テム イン 和 帯 広 知 

(0155)24-9193 (旭川 ) シ ステ ムイ ン NITSUKO 旭 川 槍 (0166)26-2250 人 @( 青 森 ) シス テム イン 青森 大 (0177)73-2696 (弘前 ) シス テム イン 弘前 容 (0172)33-5157 條 (盛岡 ) レス テム イン 岩手 佑 (0196) 
54-6876 便 (仙台 ) シス テム イン 仙台 容 (0222)66-168/ シ ステ ム ナ イン 窓 (0222)63-6454/ パ ソコ ン ロ ビ ーNTK 仙 台 容 (0222)23-8800@@( 秋 田 ) シス テム イン 秋田 窟 (0188)63-3854@( 山 形 ) シス テム イン 山形 究 (0236)42-1618( 酒 田 ) シ 
ステ ムイ ン 蘭 内 容 (0234)24-3347 介 ( 福 島 ) シス テム イン 福島 窟 (0245)22-2621 久 ( 水 戸 )1/0 ボ ポー ト 水 戸 容 (0292)25-6888@@( 土 浦 ) パ スコ ッ ト イ ン 土 浦 容 (0298)24-2700@@( 筑 波 )1/0 ポ ー ト 筑波 遷 (02987)2-3252@@( 宇 都 宮 ) シス テム イン 
宇都 宮 鶴 (0286)2|-|161 人 (高崎 ) ソ フト ビア 高崎 容 (0273)62-5436 亀 (浦和) シス テム イン サン プレ ー 容 (0488)22-233| (大宮) パス コット イン 大 宮 容 (0486)44-6326/ 大 塚 0A セ ンタ ー 大 宮 大 (0486)45-5521@( 越 谷 ) 大 居 0A シ ョ ッ プ 越 谷 
容 (0489)87-17 中 1 候 ( 秩 父 ) パ ソック 秩父 容 (0494)24-8200@( 所 沢 ) シ ステ ムイ ン 所 沢 容 (0429)25-5207 念 (千葉) パス コッ トイ ン 千 葉 容 (0472)53-877!/ 大 塚 0A シ ョ ッ プ 千 葉 枯 (0472)48-1721@( 船 橋 ) 大 塚 0A シ ョ ッ プ 船 橋 鶴 (0474)34- 
52 中 念 ( 松 戸 ) 大 塚 0A シ ョ ッ プ 松 戸 容 (0473)46-1211 人 (八重 洲 ) 大 塚 0A セ ンタ ー 八 重 洲 容 (03)28|-4711 條 (銀座) テク ニカ ルー イン 容 (03)564-6561 (日本橋) シス テム イン LION 日 本 橋 窟 (03)662-8211 人 (新宿 )YDK シ ステ ムセン ター 
容 (03) 342-9435/ マ イコ ン シ テ ィ 容 (03)354-8571/ 大 塚 0A シ ョ ッ プ 新 宿 (03)366-216! 人 (渋谷 ) 渋谷 パ ソコ ン セ ンタ ー 人 容 (03) 499-267| 久 (秋葉原) シス テム イン 秋葉 原 鶴 (03)251-4717 念 ( 東 神田 )1/O ポ ボー トリ ョ ー サ ン 容 (03) 864-5841 
@( お 茶 の 水 ) パ スコ ッ ト イ ン お 茶 の 水 鶴 (03)293-!391@( 水 道 橋 ) 大 塚 0A セ ンタ ー 本 社 容 (03)264-381| (田端) 大塚 0A シ ョ ッ プ 田 端 容 (03)810-1511 人 (田町 ) ス ペー ス ・ イ ン 田 町 鶴 (03)455-3651/ ソ フト ピア 容 (03)452-7491@( 品 川 ) 
パソ コン ロビ ピーNTK 品 川谷 (03)442-8800@( 目 黒 ) シ ステ ムイ ン 新 光 容 (03)719-8128@( 立 川 ) シ ステ ムイ ン NITSUKO 立 川 容 (0425)27-3211 人 (町田 ) シ ステ ムイ ン デ ン セ イ 容 (0427)26-7911@( 川 崎 )JMC シ ステ ムイ ン 川 崎 容 (044)211- 
2234 便 (横浜) 大塚 0A セ ンタ ー 横 浜 椅 (045)453-1338 久 (藤沢 ) 大 塚 0A シ ョ ッ プ 卒 沢 容 (0466)27-8151@( 新 潟 ) シス テム イン 新潟 (新潟 店 ) 谷 (0252)25-0895/OA ラ ンド CEC 容 (0252)4!-5610/ パ ソコ ン ロ ピ ビーNTK 新潟 槍 (0252)67-8824 
(富山) イン バ ルス 容 (0764)9|-2212/ イ ン パ ルス プラ ザ 誠 (0764)3|-|100@( 高 岡 ) イ ン バ ル スタ カオ カ 容 (0766)25-7212@( 金 沢 ) 北陸 マイ クロ コン ピュ ー タ 販売 槍 (0762)21-302|/ バ ソコ ン ICC 容 (0762)42-7121@( 福 井 ) シ ステ ムイ ン 福 井 
容 (0776)36-!414@( 甲 府 ) シ ステ ムイ ン ナ カゴ ミ 甲 府 容 (0552)28-3333@@ (長野) シス テム イン 信州 (長野 0A セ ンタ ー) 容 (0262)27-6136 人 (松本) シス テム イン 信州 (松本 OA セ ンタ ー) 容 (0263)36-5301@( 佐 久 ) シス テム イン 信州 (佐久 0A 
セン ター) 容 (02676)8-2777 候 (岐阜 ) フ ュー チャ ー イ ン 岐 阜 大 (0582)66-5911 信 (高山) シス テム イン 高山 鶴 (0577)32-1738@@( 静 岡 ) バ パス コッ トイ ン 静 岡 枯 (0542)55-7071@( 沼 津 ) バ パス コッ トイ ン 沼 津 棒 (0559)63-9711 (浜松 ) パ スコ ッ ト イ ン 
浜松 奪 (0534)54-3974/ フ ュー チャ ー イ ン 浜 松 容 (0534)54-6633 人 (名 古屋 ) シス テム イン 名 古屋 容 (052)562-587|/ フ ュー チャ ー イ ン 名 古屋 容 (052)26!-2555/0A シ ュ テ ム ・ サ ポー ト IkkKoO 容 (052)733-0690/ フ ュー チャ ー イ ン 金 山容 (052)33|- 
8910/ パ ソコ ン ロ ピ ビーNTK 名 古屋 容 (052)935-88 1 久 ( 豊 橋 ) シス テム イン 豊橋 (0532)55-9621@( 豊 田 ) ジ ン テ ー ゼ 豊田 店 容 (0565)27-3088@ (刈谷 ) ジン テー ゼ 刈 谷 店 容 (0566)23-1131 久 ( 津 ) シス テム イン 三重 窟 (0592)25-1188@ 
(四日市 ) シ ステ ムイ ン 四 日 市 容 (0593)47-1866 信 (大津 ) シ ステ ムイ ン 滋賀 大 (0775)22-4689@( 京 都 ) シス テム イン 京都 松 (075)351-4440( 福 知 山 ) シス テム イン 福知山 枯 (0773)23-3535@( 無 鶴 ) 舞鶴 コン ピュ ー タ シス テム 谷 (0773)63- 
6110@( 梅 田 ) シ ステ ムイ ン 協 和 容 (06)315-7310/ シ ステ ムイ ン 秋 葉 原 梅田 ショ ー ル ー ム 容 (06)347-!38!/OAS 大 阪 容 (06)34-3215 候 (堂島) シス テム イン タカ ギ 容 (06)343-!234 久 (本 町 ) ハ ー ド & ソ フト NDK 佑 (06)543-0808@( 船 場 ) シ 
ステ ムイ ン LION 船 場 谷 (06)222-3598 念 (天満橋) マイ クロ ベー スミ カサ 0SAKA 容 (06)947-1039 久 (森ノ宮 ) バ パソコン ロビ ーNTK 森 ノ 宮 容 (06)976-8800@( 杭 全 ) シス テム イン 高電社 容 (06)719-1131@( 歌 島 ) コ ン テ ッ クマ イコ ン セ ンタ ー 容 
(06)472-0265 人 (大淀 ) 大塚 0A セ ンタ ー 大 淀 容 (06)458-2501 候 ( 南 御堂 前 ) シ ステ ムイ ンダ イワ ボウ ・ 本 店 鶴 (06)28!-1161@( 東 大阪 ) フ ュー チャ ー イ ン 東 大 阪 遷 (06)720-2333@( 堺 ) シス テム イン 堺 容 (0722)23-1414 人 (吹田 ) ス ペー ス 
イン 江坂 容 (06)380-2115 人 (神戸 ) シ ステ ムイ ン 神 戸 容 (078)232-0001@( 姫 路 ) シ ステ ムイ ン 姫 路 容 (0792)88-6001@( 和 歌 山 ) フ ュー チャ ー イ ン 和 歌 山容 (0734)26-1818@@( 鳥 取 )0A セ ンタ ー ヒ ロケ ン ( 鳥 取 店 ) 谷 (0857)22-1345 人 (米子 ) 
シス テム イン 米子 容 (0859)32-7151( 松 江 )0A セ ンタ ー ヒ ロケ ン ( 松 江 店 ) 鶴 (0852)26-0707 人 (岡山 ) シス テム - イ ン 賠 山容 (0862)33-2236/OEC 岡 山容 (0862)3|-7799@@( 廊 敷 ) シ ステ ムー イン 倉敷 枯 (0864)24-4646( 津 山 ) ツ ヤマ シス 
テム 谷 (08682)8-2466 旬 (広島 ) イ ンタ フェ ー ス 容 (082)249-3950/ シ ステ ムイ ン ホ クシ ン 容 (082)228-2783/0A セ ンタ ー ヒ ロケ ン ( 広 島 店 ) 枯 (082)294-0707@( 福 山 ) フ タバ マイ コン 容 (0849)24-6550@@( 三 原 ) ヒ ロ ヨシ (08486)4-82II@( 下 
聞 ) 0A セ ンタ ー ヒ ロケ ン ( 下関 店 ) 大 (0832)24-0707 旬 (岩国 ) シス テム サン ワー ルド 容 (0827)23-0333 人 (徳山 ) シ ステ ム サ ン ワー ルド 徳山 店 谷 (0834)32-2646@@( 宇 部 ) シス テム イン 山口 容 (0836)32-2377( 徳 島 )1/O ポ ボー ト 山 基 (0886) 
23-7183 人 (高松 )1/O ボ ポー ト 山 姜 高 松 鶴 (0878)6!-7266/ シ ステ ムイ ン 高 松 棒 (0878)34-2263@( 松 山 ) イ ンタ フェ ー ス 松山 容 (0899)32-005|/ パ ソコ ン ロ ピ ビーNTK 松 山容 (0899)43-1249@( 福 岡 ) フ レム ラ ・ エ ルコ ン 容 (092) 751-6647/ シ ス 
テム ソフ ト 福 岡谷 (092) 714-6254@( 北 九州 )1/0 ボ ー ト 北九州 容 (093)52|-1231 の (長崎 ) シ ステ ム ハ ウ ス 長 崎 容 (0958)47-8125/ シ ステ ムイ ン 長 崎 棒 (0958) 24-8293/1/O ポ ー ト ナガ サキ 容 (0958) 28-0255 @( 熊 本 ) シス テム イン 熊本 谷 
(0963)7|-7776/ バ パソ コン ロビ ーNTK 熊 本 容 (0963)52-8800 人 (大分) マイ クロ ペー ス 大 分 容 (0975)32-2535 久 (宮崎 ) シス テム イン 宮 崎 容 (0985)29-3206/ シ ステ ムイ ン 南 九州 宮崎 容 (0985)52-4711 久 (鹿児島) シス テム イン 南 日 本 容 (0992) 
23-723|/ シ ステ ムイ ン 鹿 児島 枯 (0992)23-8366@( 玩 覇 ) シス テム イン 沖縄 容 (0988)62-0660 


A あ 日 本 電気 クレ ー プ 


る 、 ペー ソナ ルコ ンピュータ 販売 推進 本 部 〒I08 東京 都 港 区 芝 5 丁 目 33-7( 徳 栄 ビル ) 容 (03)453-551I( 大 代 ) 
日 本 電気 株 式 会 社 情報 処理 0A シ ステ ム 事業 部 〒|08 東京 都 港 区 芝 4 丁 目 !4-2( 第 二 田 町 ピル ) 容 (03)454-91I1( 大 代 ) 


新 日 本 電気 株 式 会 社 バー ソナ レコ ンピュータ ・ デ ィ スプ レイ 事業 部 販売 部 〒!08 東京 都 港 区 才 5 丁目 37-8( 住 友 三 田 ピル) 谷 (03)454-5111( 大 代 ) 


フツ フ ン だ 紙 く な る 。 
と ブル ば アン ケーズ ダ に し だ (が る 。 


PC-6001 専 用 プリ ンタ (接続 ケー ブル 込み ) 


EE 革 穫 式 記 \76.500| | 


@PC-6001 と の 接続 は 専用 ケー ブル で 可能 代 PC-6001 の 
命令 で リス ト や 画面 の コピ ー が 可能 免 コ マン ド 指 定 に より 
横 2 倍 文字 の 印字 が 可能 但 グ ラフ ィ ッ ク 印 字 は も ちろ ん 、 
グラ フィ ッ ク ・ デ ー タ の 繰り 返し 指定 も 命令 で 可能 欠 印 字 
開始 位置 の 指定 が 廊 字 単位 また は ドッ ト 列 単位 で 可能 
(ポジ ショ ニン グ 機 能 ) 念 同一 行内 で 標準 文 

ッ ク な どの 混在 印字 が 可能 但 パ ッ フ ァ フ ル 、 印 字 オ ー バ ー 
の 場合 は 自動 印字 機能 で 印字 可能 亀 自己 印字 機能 内 
蔵 念 縦横 比 1 : 1、 30 字 / 秒 、8 イ ンチ 幅 


FM-8、PC-8001 用 プリ ンタ 


ら ロ - ら 5 ら OF 詞 Mi 新 発 売 


@FM-8 と の 接続 は 専用 ケー ブル (別売 ) で 可能 (PC- 
8001 専 用 ケー ブル も 用 意 ) 借り リス ト や 画面 の コピ ー は FM 
8(PC-8001) の 命令 で 可能 葉 全 廊 字 、 全 画素 は FM-8 
と PC-8001 の 仕様 に 準じ ます 。 縮小 女 字 が 可能 (960 ド ッ 
ト / 行 ) 令 コ マン ド 指定 に より 横 2 倍 文字 の 印字 が 可能 
@⑯ グラフィック 印字 が で き 、 命令 で グラ フィ ッ ク ・ デ ー タ の 
繰り 返し 指定 可能 念 同一 行内 で 全 印 字 モ ー ド の 混在 印 
字 が 可能 (グラ フィ ッ ク 、 標 準 文字 、 2 倍 文字 等 ) 念 印字 
開始 位置 の 指定 が 女 字 単位 、 ま た は ドッ ト 列 単位 で 可能 
(ポジ ショ ニン グ 機 能 ) 倫 プ ログ ラム 指定 に より 改行 間隔 
の 指定 が 可能 借 1 ペ ー ジ 分 の 改行 指定 可能 亀 自己 印字 


世界 の プレ ンタ 


Ga ロロ iC 
im ロモ 己 じ 


シリ ー ズ 


機能 内 蔵 介 50 字 / 秒 、25 字 / 秒 、 10 イ ンチ 幅 借 ケ ー プ ル 、 
イン タフ ェ ー ス の 価格 : FM-8 用 ケー ブル (#GP-25606) 
\7.500/PC-8001 用 ケー ブル (#GP-80024B) \7.500 
/IEEE-488 用 イン タフ ェ ー ス ( 半 GP-25016) \14.800 


文 最高 の イン テリ ジェ ント 機能 
は 口 - ら 紀 ロ XX \89.000 


標準 女 字 の ほか い 、 縦 ・ 横 、 及 び 縦 横 
2 倍 娘 字 の 印字 が 任意 に 指定 可能 ( 拡 
大 補間 機能 つき ) 欠 プ ログ ラム 印字 ( プ 
ログ ラム ・ メ モリ と し て 80 バ イト 内 蔵 )、 グ 
ラフ イッ ク 印 字 、 グ ラフ ィ ッ ク ・ デ デー タ の 
繰返し 印字 な どの 各 機 能 が 可能 俺 64 
種類 (384 バ イト 分 ) の 交 字 フォ ント の 登 
録 が 可能 (外部 より 書込み 可 ) @ 印 字 
開始 位置 の 指定 (ポジ ショ ニン グ ' 機 能 ) 
が キャ ラク タタ 単位 、 ま た は ドッ ト 列 単位 で 
可能 旬 同 一 行内 の 各種 印字 モー ド の 
混在 が 可能 免 改 行間 隔 の 指定 が プロ 
グラ ム 指 定 に より 可能 旬 1 ペ ー ジ 分 の 
改行 指定 可能 氏 簡 易 RS-232C を 標 
準 装備 俺 紙 検出 機構 、 プ ザー を 標準 
装備 人 女 字 間 スペ ー ス の 指定 可能 介 
自己 印字 機能 内 蔵 介 50 字 / 秒 、10 イ ン 
了 チ 幅 亀 ケ ー ブ ル 、 イ ンタ フェ ー ス の 価格 : 
PC-8001 用 ケー プッ ル ( 半 GP-80024B) 
\7.500/RS-232C 用 イン タフ ェ ー ス ( 半 
GP-25010) \9.800/IEEE-488 用 イン 
タフ ェ ー ス (#GP-25016) \14.800 


太 グラ フィ ッ ク 機 能 を さら に 充実 


ご は ロ -1 OOIMI \79.000 園 己 巳 - ロ ロ 己 \Y94.000 


久 グ ラフ ィ ッ ク 1 ラ イン ・ バ バッファ 内 蔵 の 自 
動 印 字 ( バ パッ ファ ・ サ イズ 480 バ イト ) @ 
グラ フィ ッ ク 印 字 が 可能 (図形 、 及 び グ 
ラフ の 出力 が 可能 ) 免 グラ フィ ッ ク 印 字 
の 場合 、 命令 に より グラ フィ ッ ク ・ デ ー タ 
の 繰返し B 字 が 可能 介 コ マン ド 指 定 に 
より 横 2 倍 廊 字 の 出力 が 可能 氏 印 字 開 
始 位置 の 指定 が 女 字 単位 、 ま た は ドッ 
ト 列 単位 で 可能 (ポジ ショ ニン グ 機 能 ) 
介 同 一 行内 で 標準 女 字 、 横 2 倍 文 字 、 
グラ フィ ッ ク な どの 混在 印字 が 可能 旬 自 
己 印 字 機 能 内 蔵 @ パラ レル ・ イ ンタ フ 
ェ ー ス は モン トロ ニク ス 方 式 に 準拠 久 30 
字 / 秒 、10 イ ンチ 幅 氏 ケー プル 、 イ ンタ フ 
ェ ー ス の 価格 : PC-8001 用 ケー ブル 
(#GP-80024B) \7.500/RS-232C 用 
イン タフ ェ ー ス (#GP-80010A) \28.000 
/IEEE-488 用 イン タフ ェ ー ス ( 半 GP 
80016A) \19.800/APPLE II 用 イン 
タフ ェ ー ス (#GP-80015B) \19.800 


文 MZ-80B 専 用 機 


⑱ ス クリ ー ン の 画像 を 、 そ の まま の 大 き さ る 
(縦横 比 1 : 1) で プリ ント 可能 金 MZ 

80B の 全 女 字 、 記 号 、 画 素 つ き @ コ ー 
ンド 指定 に より 横 2 倍 廊 字 の 印字 が 可 
能 氏 グ ラフ ィ ッ ク 印 字 (ドッ ト ・ イ メー ジ で 
の プリ ント アウ が 可能 代 印 字 開 始 位 
置 の 指定 が 女 字 単位 、 ま た は ドッ ト 列 単 
位 で 可能 (ポジ ショ ニン グ 機 能 つ き ) 
コマ ンド 位置 指定 に よる ホリ ゾン タル 

パー ティ カル タプ 機能 つき 人 同一 行内 
で 標準 女 字 、 横 2 倍 女 字 、 グ ラフ ィ ッ ク 
印字 の 混在 印字 が 可能 旬 ピ ン デ ー タ ・ 
バッ ファ フル の 場合 、 自 動 印 字 機 能 つ 
き 多 コマ ンド 指定 に より 1 行 の 桁 数 、1 ペ 
ー ジ の 行 数 の 設定 が 可能 旬 フ ォ ー ム ・ 
フィ ー ド 機能 つき 久 自 己 印 字 機 能 内 蔵 
人 @30 字 / 秒 、 8 イン チ 幅 


株 式 会 社 策 工 會 


情報 機器 部 営業 課 
〒130 東京 都 墨 田 区 太平 4-1-1 
電話 (03)625-4610 


MZ-80(KK2・C) 専 用 機 言 能 / 低 価格 を 主張 する 汎用 機 
GP-BOD(EX) \84.000 


@MZ-80 の 全 女 字 、 記号 、 画素 つ き 
@ ド ッ ト ・ イ メー ジ 機 能 つ き 外 画像 ( 図 
形 )、 女 字 及び 横 2 倍 女 字 の 行内 混在 
プリ ント が 自由 (画素 キャ ラク タ の 編集 
不要 。 横 2 倍 文 字 も 標準 装備 ) 信用 紙 
トラ クタ を 標準 装備 @2 種 の ライ ン ・ フ ィ 
ー ド 176、 179) を コマ ンド 指定 可能 
人 の 自己 印 字 機 能 内 蔵 信用 紙 は 安価 な 
普通 和紙 、 印 字 鮮明 で マル チュ ピー6OK 
@ リ ボン は 手軽 な カモ ッ ト 式 氏 バ ッ フ ァ 
フル 、 印 字 オ ー バ ー の 場合 は 自動 印字 
機能 で 印字 で きま す 久 CR 命 令 で 、 印 
字 後 改行 また は 改行 な し の 選択 が ジャ 
ン パ ー に より 可能 免 30 字 / 秘 、8 イ ンチ 幡 
※ 直結 タ イブ GP-80D (N・EX) \94、 
000 も 好評 発売 中 ./ 


@ 画 像 (図形 )、 交 字 及び 横 2 倍 女 字 
の 行内 混在 プリ ント が 自由 (画素 キャ 
ラク タ の 編集 不要 。 横 2 倍 女 字 も 標準 
装備 ) @ 用 紙 ト ラク タ を 標準 装備 錯 2 種 
の ライ ン ・ フ ィ ー ド (17/6、1//9) を コマ ンド 
指定 可能 亀 CR 命 令 で 、 印 字 後 改行 ま 
た は 改行 な し の 選択 が ジャ ン パ ー に よ 
9 可能 旬 用 紙 は 安価 な 普通 紙 、 印 字 鮮 
明 で マル チコ ピー も OK@ リ ボン は 手軽 
な カセ モッ ト 式 氏 バ パッ フ ァ フル 、 印字 オー バ 
ー の 場合 は 自動 印字 機能 で 印字 で き 
ます @ モ ント ロニ クス に 準拠 の パラ レル ・ 
イン タフ ェ ー ス 内 歳 念 自己 印字 機能 内 
蔵 人 @30 字 / 秒 、 8 イン チ 幅 免 ケ ー ブ プル 、 
イン タフ ェ ー ス の 価格 : PC-8001 用 ケ 
ー プ ル (#GP-80024B) \7.500/RS 
232C 用 イン タフ ェ ー ス (#GP-80010 
A) \28.000/IEEE-488 用 イン タフ ェ 
ー ス (#GP-80016A) \ 19.800/APP 
LETII 用 イン タフ ェ ー ス ( 后 GP-80015 
B) \19.800 


ST クン 
すべ つか えま す 入門 用 
N スズ. N 〇 
手軽 に つか える BASIC プ ログ ' ラ ミン グ 入 門 用 コン ピュ ー タ が 登場 し まし た 。 ご く ご く 私 的 な 興味 か ら 始 め ら れ ま す 。 バ シン クレ ア ZX81/ は 、 高 性 
能 で つか いや すい 機能 を 灘 縮 し て 、 飛 躍 的 な 低 価格 と コン パク ト 化 を 実現 。 エレ クト ロニ クス の 結晶 と 5 いえ る シン フッ シス テム で す 。 但 世 界 中 


で 評価 の 高い BASIC プ ログ ラミ ング ・ マ ニュ アル (手引 書 ) は 、 ま っ た く は じ め て の 方 で も 短 時 間 で 確実 に マス ター で きる すぐ れ た 内 容 を 誇っ 


て いま す 。 旬間 違っ た 入力 を する と その 場 で それ を 発見 し 、 間違い の 箇所 を あな た に 知ら せる 構文 エラー チェ ッ ク 機 能 が 学習 を 早め ます 。 介 命 
令 語 (た と えば INPUT) を ワン ・ キ ー (I と 押す だ け ) で タイ フイ ン で きる イー ジー オペ レー ショ ン 。 倫 デ イス プレ イ は 家庭 用 TV (UHF33ch)。 外部 
メモ リ は 一 般 の カセ ッ ト テ ー プ "レコ ュー ダ を 使い ます 。 代 上 達 に あわ わせ て オプ "ショ ン の 16K RAM パ ッ ク 、 ZX プ リン タ で シス テム ・ ア デップ" でき ます 。 
いよ いよ コン ピュ ー タ が 私 生活 に 入っ て きま し た 。 知 的 興味 か ら 実 用 へ と 上 手 に 使い こなす た め に 、 まず 基礎 を し っ か り 固め た い 8 の で すね 。 
*※ な お 以下 の ブロ グラ ム は ZX81 で は 実行 不可 能 で す の で ご 注意 くだ さい 。COLOR 文 の 使用 し て ある プロ グラ メ 例 ( 白 時 化す れ ば 可 

E) 入出 力 文 の 使用 し に C あ る プロ グラ ム 例 時 刻 関 数 の 使用 し て あ る プロ グラ ム 例 BEEP 文 に よる 音 の 出力 を 使用 し て いる プロ グラ ム 例 。 


英国 シン クレ ア 社 製 お も な 仕様 @CPU:Z80A @ROM:8K BASIC イン ター プリ タ 較 お 求め は 三井 ダイ レク ト サ ー ビ ス で 


@RAM:IK(I6K に 拡張 可 ) @ キ ー ワ ー ド 入力 方 式 人 構文 エラ ー チ ェ ッ ク 機 能 @TV モ 6 1 に M 
ジュ レー タ 内 蔵 信 カセ ッ ト イ ンタ ー フ ェ イ ス 内 蔵人 浮動 小数 点 演算 BASIC@ 数 値 吉 園 : 英国 シン クレ ア 社 製 の バシ ンク レア ZX81? は 、 選 び ぬ か れ た 商品 を ご 
+10* 半数 値 精 度 :9 よ 桁 欠 関数 計算 機能 念 蜂 似 グラ フィ ッ ク :20 個 但 エ クス プレ ッ 家庭 へ 直接 お 届け する 三井 ダイ レク ト サ ー ビ ス で ぉ 求め くだ さい 。 
ショ ン ・ エ バリ ュ エ ー タ 旬 多 次 元 変 数 配列 オプ ショ ン 16K RAM パ バック - \19,800 資料 の ご 請求 、 あ る い は ご 注文 は 資 ォ プ ショ ン 
ZX81 後 部 に 差し 込み 、 プ ログ ラム や デー タ の 記憶 容量 を 16 倍 に 拡張 し ます 。 代 2ZX プ リン 3 N 7 < ーー eee 
タン \34,800 ご ZX81 に 接続 する | 行 32 廊 字 の プリ ンタ 。 グラ フィ ッ ク 表示 や スク リー ン ・ 料 請求 券 を 切り 取り 郵便 葉書 の 斉 時 So 
コピ ー も で きま す 。 ソフ トウ ェ ア 人 三 井 物産 電子 販売 路 ま で 直接 お 問い 合わ せく だ さい . 面 に 貼っ て 、 三井 ダイ レク ト サ ー ビ ス 

係 宛 へ ご 郵送 くど だき さい 。 お りか え し 、 
家庭 用 TV だ け ご 用 意 く だ さい 。 必要 な 付属 品 は すべ て この 価格 に ふく まれ て いま す ^ シ ンク レア ZZX81" の くわ し い カ タロ グ " 


an EE と ご 注文 申込 書 を お 送り いた し ます 。 Ne 2ZX ブ リン タ Y34.800 
人 お 求め や すい 分 割 払い も ご ざい ます 。 ご 利用 くだ さい 。 
@ ご 注文 、 資 料 ・ カ タロ グ な どの お 問い 合わ せ 、 三 井 物産 電子 販売 (株 ) 三 井 ダ イレ クト サー ビス 係 


付属 品 :BASIC プ ログ ラミ ング ・ マニ ュ ア ル 、 4 トー 圭 に まさ 

EAT TEL03-502-0803 一 4 〒105 東京 都 港 区 西新 橋 2-11-5( 呉 ビル ) 
人 @ 技 術 に 関す る お 問い 合わ せ (株 ) エ ル サ ポ ー ト ネッ トワ ー ク シンク レア 技術 サポ ー ト 係 

ぼう 晶 ,Z ロ 0 TEL03-553-5954 二 104 東 京都 中 央 区 新富 町 -11-7( ミ ツヤ 第 8 ビル ) 


販売 三 井 物産 電子 販売 株 式 会 社 技 害 y*ー ト 株 式 会 社 エル サポ ー ト ネッ トワ ー ク 章 和 三井 物産 株 式 会 社 


シン クレ ア ZX81 は 全国 次 の 書店 で も お 求め いた だ け ま す 。@ 北 海道 一 省 常 革 店 札幌 店 駅 前 プラ ザ 東 急 011-212-2507 一 10 怒 川 店 PARTI0166-26-2631 介 宮 城 癌 山善 店 本 店 仙 右 市 番 肝 0222-63-1511 千葉 
: 省 常 書 店 西船 橋 店 駅 前 プラ ザ 0474-34-3111-2 介 東 京 三 省 常 書店 神田 本 店 スル ガ 耕 下 03-233-3312-15 人 0 池袋 店 池袋 バルコ 03-987-0511-3 高田 馬場 店 BIG BOX03-208-78412 新宿 店 小 ] 急 スカ イタ ウン 03-343-4871-3 
渋谷 店 東急 女 化 会 館 03-407-4545 一 7 自由 が 全店 東急 プラ ザ 03-718-2108 一 9 大井 店 阪急 百貨 店 03-775-1111( 財 店 : 史 モ ンタ ー0422-44-4904 調 仙 店 ロイ ヤル プラ ザ 0424-87-6632 人 愛知 店 名 高屋 店 名 古 
選 タ ー ミ ナル ビル 052-562-0077 一 9 候 大 阪 旭屋 書店 本 店 北 区 曽根 崎 06-313-1191 な ん ば 店 な ん ば CITY B206-644-2551 アベ ノ 店 阿部 野 筋 近鉄 特 任 店 前 06-631-6051 高槻 店 ダリ ー ン プラ ザ た か つ 

香川 宮脇 書店 本 店 高松 市 刀 久 町 0878-51-3734 介 愛 媛 。 明 屋 書店 松山 本 店 松山 市 湊町 旬 大 街 0899-41-4141 介 福 岡 福岡 外 女 常 本 店 福岡 市 中 央 区 新 大 町 092-741-2106 博多 駅 前 デイ トス 店 092-451-6175 


| カラー テレ ビ | や | テー プ * レ コー ダ | 


こり あえ ず おぉ 手間 ちの 


較 RS 弄 (パプ ル 1 右 ・ 写 … 268,000 円 
画 RD 型 (プル 2 台 ) to に 306,000 円 
L]BC-895 カ モッ ト ・ レ コー ダ (写真 ②) 14 ,800 円 
BC-891 家 庭 用 TV アダ ブタ (写真 ③)13 ,500 円 


BUBCOM80 周辺 装置 


さ 


に 


に 東京 八重 洲 キ ャ ン ッ 


大 阪 梅 


_ を 流用 し て _ 


NN 
え 
O ナ 
じ 誠 つ 06 Y ・ る 
 、 寺 N ' 5 ュ シ  、 ぐ の 
で ゃ 7 っ た 3 が ua シン 
に に の SN _ 2A AO が ンー DS 紅 り 
き OO ソン 7 ず 
き の (の パ パ 』 パ 9 る 
ブー 
凍っ 
< ex 朋 ) と いか 
2 AT 2 ソス 
KO 


〔 授業 の な い 日 は 、 パ ソコ ン 使 い 放 題 ・1 時 間 400 円 より 〕 

< 
"で 
八重 洲 シ ョ ー ル ー ム 


上 昌 届 
| PFTTYI 


M 由 


。 人 


人 + シ ステ ムズ フォ ー ミ ユ レ ー ト 


* ス 03(281) 2621 〒103 東京 都 中 央 区 八重 洲 1 一 8 一 17( 新 禁 町 ば ル 11 階 ) 
田 キ ャ ン パ ス 06(361) 3224 〒530 大 阪 市 北 区 角田 町 8 一 47 (阪急 ダラ ンド ピル 24 隊 ) 


斑 日 
土 ・ 日 ・ 休 日 


大 阪 ・ 梅田 ショ ー ル ー ム 


* 守 


9:00 一 19: 00 
9:00 一 18 : 00 


涯 字 鏡 明 、 高 精細 度 、 新 型 登場 。 


し し ッ 1 リ 
を 
は る 多 贅 和 内 れ 6 r * g 
も 3 『 4 1 『 rr 肖 還 L。 和音 和 。 第 5 多 を テー 9 
2 夫 + ー ら 1 2 3 4 き らら 8 て 


CDM-1480RX の 


PC-8801 に 対応 、 ニ ュー モデ ル CDM-1480RX 
周波 数 24.8kHz の 高 解像度 設計 て 640x400 ド 小 表 示 可 能 
も 鮮 か に 、 ビ ジネス か ら ホ ビー まで 多彩 が ユー ザー ニー ズ に お 


新 ライ ン ア ッ プ 勢ぞろい …… DM シ リー ズ が 、 ま すま す 多 機能 に な り ま し た 


CDM-140RX CDM-14RX  KH-90 TMC-1206X 


\110,000 \65,000 \31.000 \34,500 
R.G.B. 方 式 14 型 高 精細 度 カ ラー ディ スプ レイ R.G.B. 方 式 14 型 カラ ー デ ィ ス プレ イ /1600 文 9 型 グ リー ン モ ニタ ー 型 緑色 発光 C. 12 型 グリー ン モ ニタ ー/ 無 反射 型 緑色 発光 C 
ケー ブル 付 /2000 文 字 表 示 可 能 / 水平 表示 字 表 示 可能 / 水 平 表 り R. T. 採用 /2000 文 能 /M 8 R.T. 採 用 /2000 文 字 表 示 可 能 /MICRO-8、 
位置 移動 可能 / 画 面 サイ ス 切 /MIC RO - 8、PO-800|、8801 ! PC-800!、880I、 レ 由 対応 PC-800!、880|、 パ ソ ビ ピア 、 レベ ル 四 対応 
-8、PC-8001、880|、 パソ ビア 、 し 車 対応 G 用 ケー ブル CB ッ ー イ エロ ー 管 KH-900 も あり ます ) 


東映 通商 株 式 会 社 東映 無線 株 式 会 社 


\ 区 湯島 1 2 4 神田 モン トビ ル TEL (03) 1131 (代表 ) 都 千代 田 区 外 神 団 1-14-2 ラジ オセ ン TEL(03) 253-0987、 251-2763 


大 阪 営業 所 〒531 大 阪 市 大 淀 区 * 21 明 大 ビ ル TEL (06) 376 一 1120 (代表 ) 上 都 千代 田 区 外 神田 1-10-11 ラ ジ ォ デ ト TEL (03) 251 一 1014 (代表 ) 


※ 改 良 の た め 子 告 の 外観 ・ 仕 様 を 変更 と が あり ます f 代 田 区 外 神田 1-15-6 ミツ ウロ コ ビ ル TEL ( 253 一 5741 (代表 ) 


※ カ タロ グ ・ 資 料 の トド リ の 販 様 は 目 商 (株 ) ま で お い 致し ます 1 千代田 区 外 提 田 1-5-8 林 初 ビル TEL (03 9896 (代表 ) 


ん /SS と / 計 SYS7 と 7 42OZ47OZY 


名 古屋 に 登場 ク 本 格 的 大 型 パ ソコ ン ・ シ ョ ッ ズ 
| 
1 


今 、 話題 騒 氏 の パソ コン が 名 古屋 に 結集 ./  @ 各 社 バ パーソナル コンピュータ, オフ ィ ス コン ピュ ー タ 周辺 機器 , 


ワー ド プロ セッ サ 等 勢揃い . 
@ 基 本 ソフ ト か ら ア プリ ケー ショ ン ゲー ム ソ フ ト ま で 各種 取扱 い 。 


見 て 、 触れ て 、 思い きり ノ パ ソコ ン に 接近 し よう 。 
き が し て い だ ソ フト 、 知ら な か っ だ 情報 な ど 店 内 に いっ ぱい 。 
ホビ ー か ら オ フィ シャ シル ユ ー ス まで 
ゃ ソコ ン の 全て が まる まる そろ っ た 大 型 店 。 例 各 種 ソ フト ウェ ア の 開発 
コンピュータ に 興味 を や も っ た ら 葛 パ ソコ ン ・ セ ミナ ー 開 講 
さあ 行こ う / 日 成 シ スラ ボ へ 。 人 @ 夫 実 し た メン テ ナ ン ス 体制 


@⑱ シ ステ ム 開 発 コ ン サ ルレ ティング: 


画 営 業 時 間 AM10:00-PM6:00( 月 曜 定休 日 ) 


@ お 問合せ は 


分 の 52-337-57 の 7 
ラス し / 交 き 


〒460 名 古屋 市 中 区 上 前 津 | 丁目 4-5 林 ビ ル | 階 


テレ ビ が そう だ っ た 。 オー ディ イオ が そう だ っ た 。 
タイ プラ イタ ー も そう だ っ だ た 。 い ま 、 パ パソ コン が 
男 の 部 屋 の 新しい 顔 に な る 。'82 年 6 月 、CSK 
滋 谷 店 が オー プン 。 ライ フス タイ ル を イン テリ 
ア に 表現 する 君 。 君 の イン テリ ジェ ンス と 時 代 
感覚 を CSK で 表現 し て 欲し い 。 パ ツ ソコン ショ ッ 
プ の イメ ー ジ を 超え る 、 し ゃ れ た ディ スプ レイ 
を 見 て みな いか >。 

パソ コン ライ フ を ひろ げ る CSK。 

ます ます 充実 の 体制 で お 役に立ち ます 。 
@CSK メ ー リ ング サー ビ セ ス 開始 
ハー ド 色 ツ フト の 通信 販売 。 通信 教育 。 メ ン 
テ ナ ン ス 。3 つ の サー ビス を ワン パッ ク に し た だ 
新しい シス テム の メーリング サー ビ モ ス で す 。 
お 近く に パソ コン ショ ッ プ ' の な い 方 、 多忙 で パパ 
ソコ ン 教 室 に 通え な い 方 、 こ の CSK メ ー リ ング 
サー ビ セ ス が お 応え し ます 。 詳し く は お 気軽 に 
お 問合せ くだ きい 。 容 03-342-1940 

人 @CSK 東 証 第 二 部 に 上 場 
躍進 する CSK (コン ピュ ー タ ー サ ービス 株 式 会 
社 ) が 、 東 京 株 式 市 場 の 第 二 部 に 上 場 い た し 
まし た 。 株 式 上 場 企業 し て 、 さ ら に 盤石 の 経営 
基盤 を 確立 し ます 。 


l 


SS ド 


@@ 営 業 時 間 10 時 一 20 時 年 中 無休 (全店 ) 


3 リン グ サ ービス に 関す る お 問合せ 、 お 申込 | 
み は お 近く の オー ダー デポ へ 電話 で どう ぞ 。 

@ 札 幌 全 O11(644)1581  @ 京 都 人 な 075(256)3051 
@ 斉 森 人 0177(77)1421 @ 奈 良 人 0742(22)4761 


@ 山 形 全 0236(43)6551 @ 神 戸 人 078(576)8481 
人 @ 盛 岡 人 0196(25)2591 @ 和 歌 山 人 0734(45) 4231 


人 @ 仙 台 人 0222(61)6403 @ 岡 山 人 0862(23) 7471 
@ 福 島 全 0245(45)2191 @ 広 島 会 082(293) 1631 
@ 宇 都 宮 全 0286(62)3431 @ 山 口 会 0839(24) 7521 
@ 水 戸 全 0292(27)5057 @ 松 江 会 0852(27)2151 
@ 甲 府 全 0552(32)7753 @ 松 山 佐 0899(52) 7091 
人 @ 静 岡 全 0542(58)2411 @ 高 松 代 0878(22)5361 
@ 浜 松 人 0534(62)1711 @ 福 岡 信 092(473)6281 
@ 新 潟 代 0252(33)3021 @ 熊 本 会 0963(81)3511 
人 @ 松 本 人 0263(32)7151 @ 大 分 全 0975(37)0581 
人 @ 名 古屋 全 052(251)0991 鹿児島 人 G0992(51)6771 
@ 金 沢 人 0762(23)8841 @ 東 京 谷 03(342) 1940 
@ 大 阪 佑 06(365)9481 @=:- ョ -2 佐 201(866) 2880 


CSK シ ョ ッ プ で も お 待ち し て お り ま す 。 


マイ コン ショ ッ プ CSK 新宿 西口 店 
03-342-1901 

マイ コン ショ ッ プ CSK 新宿 住友 ビル 店 
03-342-5299 

マイ コン ショ ッ プ CSK 渋谷 店 
03-477-5875 

マイ コン ショ ッ プ CSK 吉祥 寺 店 
0422-21-8121 

マイ コン ショ ッ プ CSK 大 阪 店 
06-345-3351 

CSK フ レン ドリ イシ ョ ッ プ 池袋 店 
パル コ マイ コン スタ ジオ 
03-981-5283 

CSK フ レン ドリ イシ ョ ッ プ 平塚 店 
マイ コン スク エア アラ イ 
0463-23-8484 

CSK フ レン ドリ イシ ョ ッ プ 札幌 店 
プ ブッ クセ ンタ ー 冨 貴 営 
011-214-2303 

CSK メ イリ ング サー ビ セ ス 本 部 
03-342-1940 


四 
」 
6 
肖 


て OO 


シス テム ハウ ス の ユニ コム が 手がけ た パソ 


コン は 、 や っ ぱり どこ か シス テマ ティ ッ ク 。 
コン ポー トト は 、 使 用 目的 を 限定 され な い マ ル 
チ 思 考 型 の パー ソナ ル ・ コ ンピュータ で す 。 

パー ソナ ル ・ ユ ー ス は いう まで も な く 、 計 測 ・ 
制御 レス テム や FA( フ ァ ク トリ ・ オ ー ト メー 
ショ ン ) の イン テリ ジェ ント ・ コ ント ロー ラ 
と し て 、 あ る い は 本 格 的 な オン ライ ン 業 務 用 
の ター ミナ ル と し て 、 用 途 に 合わ せ て 存 分 に 
使い こなし て くだ さい 。 

人 @ 充 実 し た ソフ トウ エア ・ ラ イン ナッ プ /PTOS 上 て 動 
作 する BASIC を 標準 装備 じ て い る (ほか 、COBOL.TOOLS-F 
や CP ン M- 86 上 で 動作 する C BASIC86、CIS-COBOL86、 


wopaz- ッ (OMPORT 


ャ 
CA 吉 
件 江 


@ お 問い 合わ せ 、 
資料 請求 先 


社員 募集 中 


文 当社 で は マイ コン に 興味 を も つ 意 欲 あ る 人 材 を 求め て いま す 。 


PASCAL プ M86 お よび MT 十 86、 ASSEMBLER86 な ど が 
用 意 さ れ て いま す 

@ 高 速 処理 と 大 容量 の 記憶 部 16 ビ ピッ ト ・ マ イク ロブ プロ 
セッ ザ サ 搭載 に より 処理 束 度 は グン と アッ プ 、 メモ リ は 標 
準 128KB が 装備 され 、 最 大 256KB ま て 増設 可能 。 外 部 記 
憧 装置 と し て 薄 形 8 イン チ ・ フ ロッ ピー 装置 を 2 台 標準 
装備 (IMBX2) し 、 こ ちら も 最大 4 台 まで 増設 で きま す 
(その ほか 、 固 定 デ ィ ス ク 装 置 と の 接続 も 可能 。) 

@@ 高 解像度 カラ ー グ ラフ ィ ッ ク を 実現 横 640 ド ッ ト メ X 
縦 456 ド ッ ト の グラ フィ ッ ク 機 能 を 搭載 する こと に より 、 
級 密 で 鮮明 な 画像 が 描け ます (カラ ー、 グ リー ン と も ) 
@ 本 格 的 日 本 語 奴 理 カ ナ 漢 字 変換 ・ 表 示 選 択 ・ 部 首 選択 
の 3 つの 入力 方 式 に より 、 高 度 な 日 本 語 処理 に 対応 で き 
ます 。( 画 面 上 で は 約 3500 文 字 種 、 プ リン タ で は 約 
7000 娘 字 種 を サポ ー ト し ます 画面 表示 文字 構成 


ユー フン 。 0 ー ニ ノラ ニーノ ノア = ば 


本 社 / 東 京都 渋谷 区 広尾 |! 一 3 一 8 広尾 オフ ィ ス ピル 〒!50 佐 03 一 446 一 6488 穫 
札幌 営業 所 札幌 市 豊平 区 月 寒 西 一 条 七 丁目 〒9062 容 0!| 一 852 一 7743 


I5XI6 ド ッ ト 、 プ リン タ 出 力 文字 構成 24X24 ド ッ ト ) 

@ 豊 富 な ソフ トバ パッ ケー ジグ 表 計 算 、 日 本 語 ワ ー ド プロ 
セ シ ン グ 、 デ ー タ の 登録 ・ 検 索 な どの ソフ トウ エア ・ パ 
ッ ケ ー ジ が 用 意 さ れ て いま す 

@ わ か りや すい オペ レー ショ ン 機 能 自 動 オ ペレ ー シ ョ 
ン 、 メ ニュー 機能 、 絵 表示 に よる エラ ー メ ッ セ ー ジ な ど 、 
使い や すさ へ の 細か な 配慮 が な され て いま す 

その ほか 、 い ろ い ろ 強力 な 通信 機能 、 品 揃え 豊 
富 な ベリ フェ ラル 群 、 メ ロディ 機能 に よる 自動 演奏 、 


etC.、 6tG. 


(*CP プ M-86 は デジ タル リサ ー チ 社 の 登録 商標 で す 。 ) 
(プリ ンタ は オプ ショ ン で す 。) 


特殊 仕様 の シス テム の ご 相談 に も 応じ ます 。 


GII ドク 2 


698,000 円 (ダグ リーン モニ タ 、FDDX 1) 
798,000 円 (グリ ー ン モニ タ 、FDDX2) 
998,000 円 (カラ ー モ ニタ 、FDDX2) 


錠 記 


資料 請求 券 
N K 


& ハー ドウ エア 技術 者 、 営 業 ) 
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Soffwqare Library 


教養 の BASIC。 
天 用 の 9 
好調 市 場 浸透 。 


卓二 の も 


成長 する 簡易 マフ ト …… と と し て 、 昭 利 I57 年 
5 月 、 独 立 系 大 手 ン フト ウェ ア ・ ハ ウス 株 式 
会 社 コ ンピュータ アフ リケーション ズ ( 遇 称 : 
CAC 本 社 : 東 京 代表 取締 役 : 大 久 
保 か ら 発 売 き れ た 集計 計算 型 簡易 
ン フ ト ーOA・1 が 、BASIC を 知 1I ら な く て も 、 
ィ パ ンコ ンカ が 自在 に 使い こなせ る 点 に 好評 を 
得 て 、 い ま 爆 発 的 な 売れ 行き を 示し て いる 。C 
AC・O4 研 究 室 が 、 ビ ジネス 現場 の ニー デズ 
に 応え て 開発 し た OA・1 の 特長 は …ー 
@ ブ ログ ラム の 自動 作成 (ユー ザー の 要 
求 通り の ブロ グラ ム を わずか 1 一 2 分 で 
作成 。 自動 修正 可能 。 BASIC に 精通 し 
だ 場合 、 デ ログ ラム に 手 を 加え る こと も 可能 ) 
人 @ 誰 で も 気軽 に 使用 で きる (操作 ミス や プ 
ログ ラム の 作成 ミス が あっ て も 簡単 に 元 
に 戻し た り 、 修 正 が 可能 ) 

@ コ マン ド な し (操作 は す で て メニ ュー 方 
式 。 次 の 操作 が ー 目 瞭 然 ) 

人 @ 高 速 ソ ー ト < 並べ 替え > (機械 語 の 採用 
で 、 デ ー タ の 並べ 替え 時 間 を 飛躍 的 に 
短縮 100 件 の デー タ を 約 15 秒 で ソー ト ) 

人 @ 作 表 は 項目 選択 方 式 で 小計 ・ 中 計 ・ 

・ 平 均 な ど 自 由 

人 @ 強 力 な 再 計 算 機能 (売上 子 測 な ど を 1.05 
倍 で みる か *1.06 倍 に する fe な ど 、 計 算式 
の 設定 が 自由 。 何 回 も の 再 計算 可能 。 
再 計算 中 の 状況 把 提 可 能 ) 

@BASIC イ ンタ フェ ー ス (OA・1 で 作成 . き 
和 れ た デー タダ ファ イル を BASIC フ デ ロ グ "ラム 
で 読み 書き で きる イン タフ ェ ー スプ" ログ " ラ 
ム の 公開 ) 


簡易 ソフ ト を は じ め と する OA ン フト の 殿堂 


呈 OA セ ンタ ー。 オ ー プ ン //<88 和 57 年 10 月 > 


新宿 副 都 心 の 最後 の 趣 高 層 ビ ル と し て この 秋 完 成す る 《 新 宿 NS ビ 
ル 》5 階 に 、OA の A か ら 乙 まで を 綱 維 し た OA ソ フト の 殿堂 一 一 「CAC 
OA セ ンタ ー」 が 、 同 ビル の 完成 と 同時 に オー プン する 。 創業 以来 15 
年 余 、 今 日 まで ~ 役 底 し た エン ド ユ ー ザ ーー 指向? を 社 是 と し て きた CAC 
の 同 セ ンタ ー 開 設 は 、 い ま 各 界 か ら 大 き な 期 待 と 注目 を 集め て いる 。 
同 セ ンタ ー の OA 研 究 室 長 に よれ ば 「 ハ ー ド の 導入 か ら ン フト の 制作 、 
選定 まで OA に 関す る どん な ご 相談 に も 応じ ます 。 また 、 簡易 ソフ ト を 
中 心 と する 各種 優良 0A ン フト を 、 実際 に 手 で 触っ て いた だ き な が ら 
ご 購入 いた だ ける 場 に も し た いと 思い ます 。 企業 の OA 担 当 者 な ら ず 
と も 、OA に 興味 の ある 方 な ら ど な た で も 気楽 に お 遊び に 来 て いた だ 
きた いと 思い ます …」。 と の こと 。 ちな み に 同 セン ター に は 、 内 外 の OA 
に 関す る 書籍 、 パ ン フ レッ ト を 満載 し た ブッ ク ・ コ ー ナ ー も 用 意 さ れる と い 
うか ら 楽 し み 。 (新宿 南口 か ら 徒 歩 約 10 分 ) 


( 稔 コ ンピュータ アブ リケーション ズ ~ 


@ 完璧 な ファ イル 管理 機能 (OA・1 で 作成 し 
た ピロ グラ ム や デー タフ ァイル の 管理 は 
も と より 、 購 入 し だ た 新 フ ロッ ピー・ デ ィ ス ク の 
イニ シャ ライ ズ ま で OA・1 が 実行 ) 

が 、 何 より その 使い や する き と 実 用 

性 が ビジ ネス マン の 心 を 掴ん だ らし い 。 

「BASIC は 素晴らし い 、 し か し 、BASIC は 

の 」 と お 考え の 読者 諸兄 、 ぜ ひ 

度 OA・1 の 僚 力 を 試 め ゆる れ て みて は いか ゝ カ か 『 

だ ろう 。OA・1 を 活用 し て いる 人 々 の 間 で は 

すでに ^OA・1 き ほえ あれ ば BASIC は 不要 ? 

の 声 さ え あ が か が っ て いる 。 


画 QA の 仕様 

o 登 録 容量 : よこ 30 項 目 (250 字 ) た て 最 
大 200 行 (MULTI 16 は 500 行 ) の 画面 移 
動 : 上 下 左右 ワン タッ チ スキ ッ プ 方 式 G 
編集 : 項目 単位 修正 、 行 挿入 、 行 削除 
並べ 替え : 昇順 、 降 順 、 機 械 語 SORT oO 
グラ フ : 棒グラフ (スケ ー ル 任意 指定 )O 検 
索 : <, > 多段 検索 O 作 表 : 出力 項目 
選択 方 式 、 印 字 仁 置 指 定 、 大 ・ 中 ・ 小 計 お 
よび 平均 Oo 項目 設定 変更 : デー タ 登 録 中 
の 項目 、 追 加 ・ 変 更 可 o 再 計算 機能 : 計 
算式 を 変更 し て 全 デ ー タ の 再 計 算 可 


画 Ai の 販売 価格 

氏 己 C-8000 用 \80.000 博 \1.000 
氏 選 C-8800 用 \88.000 博 \1.000 
@ MULTI-16 用 \98.000 吉 \1.000 


《 通 信販 売 の お 知ら せ 》 

CAC Software Library は 通信 販売 も 
ES ら か じ め の 連絡 が 
必要 。< 品 座 番号 : 住友 銀行 神田 支店 
( 当 ) No220832 曲 コ ンピュータ タン リン スー 
ショ ンズ 宛 > 


花王 の オリ ジ ナ ル ・ ソ フト ウェ ア を 
つい に 商品 化 。 


ユニ ー ク な パン コン 活用 で 有名 な 花王 石鹸 
和 則 の オォ オリジナル ・ ン フト ウェ ア ヵ CAC・OA 研 
究 節 の 手 に よっ て CAC software library 
に 参画 し だ た 。 あ ら ゆ る 分 野 の シス テム コン サ 
ル テ ー シ ョ ン 、 カ スタ ムン フト の 開発 、 き さらに 
は ジス テム の 開発 と 販売 を 通 
、 企 業 の 情報 化 に 貢献 し て 来 だ た CAC ヵ 『 
2 花王 の オリ ジ ナ ルン フト ウェ ア は 、 
即 戦 力 と し て 、 現 場 の 大 き な 力 と な る こと だ ろう 。 


画定 期 券 購入 シス テム \ ギ 39.000 吉 1.000 
画 エ コン ミー 切符 管理 シス テム \39.000 
きき 1.000 画 XY プ ロッ タ 人 作図 シス テム ギ 
39.000 到 1.000 ※ い ずれ も PC-8000 用 。 


本 社 〒IQl 東 京都 千代 田 区 ーッ 橋 2-3-! 小学 館 ビ ル TEL(03)263-7241⑯ 
| 関西 営業 所 〒550 大 阪 市 西区 京町 堀 に 4-9 京町 橋 入 千代 ビル TEL(06)444-0230 人 や 


/] ロ 0 @】 Personalcomputer & Communications 


間 題 7 つ 即 解決.2 


AL ご PC リー ズ の こと な ら 、 パ スコ ッ ト ・ グ ルレ ルーブ プ に お まかせ くだ さい 。 


一 度 パ ソコ ン に 触れ て みた いと お 考え の まっ た く の 初 心 者 の 方 
や すぐ に 仕事 に 役立て た いと 必要 に 迫 ら れ た 実務 派 の 方 、 自 分 
自身 の オリ ジ ナ レル な プロ グラ ミン グ を 試み た い 方 な ど 、 パソ コン に 
た くす 思い は 十 人 十 色 。 この よう な ユー ザー の 皆様 の 千 差 万 別 
の 問題 に 対し 、 的 確 な アド バイ ス が で きる の が 専門 店 と し じ て の マ 
イコ ン シ ョ ッ プ な の で す 。 


パス コッ ト ・ ク リレー プ は 、 マ イコ ン の 専門 店 と し て 長年 の 実績 と 豊 
富 な 経験 を も と に NECO の パソ コン を トー タル レル で シス テム アップ 。 さ 
ま ざ ま な 問題 に 対し 即 、 対 応 で きる だ け の ハー ド 、 ソ フト を 豊富 に 
取 揃 え 、 専 門 店 と し て ユー ザー の 皆様 へ 充分 な ノウ ハウ を 提供 
し て いま す 。 


すぐ に 仕事 に 役立て た いと 必要 に 師 
られ た 実務 派 の 方 へ 。 


一 度 パ ソコ ン に 触れ て みた いと お 考 
え の 初 心 者 の 方 へ 。 


自分 自身 の 手 で 独自 の オリ ジ ナ ル ・ 
プロ グラ ミン グ を 試み た い 自 作 派 の 


「 パ ソコ ン と は - - 体 何 ん だ ろう 7? また 何 が で きる 
の だ ろう 7?」、「 興 味 が あり 使っ て みた い が ま だ " - 
度 も 触れ た 事 が な いし 、 ど うす れ ば よい の か 分 か 
ら な い 」 な ど お 考 え の 初 心 者 の 方 、- - 度 パス コッ ト 
イン を の ぞい て みて くだ きい 。 店 頭 に は NEC の パ 
ソコ ン を は じ め 、 各 種 周辺 機器 、 ソ フト ウェ ア な ど を 
豊富 に 取 揃え 、 常 時 デモ ンス トレ ーション を 行っ て 
いま す 。 ま ず は 納得 いま で ご 覧 くだ さい 。 素朴 な 
質問 は 大 歓迎 / ど ん な 事 で も 気軽 に お 穫 ね くだ 
さい 。 ま た 、 基 本 的 操作 や 初歩 的 な ゲロ グラ ミン 
グ を 学習 きれ だ い 方 の た め に 、 ビギナー の た め 


例え ぇ ば 、 現 在 、 在 庫 管理 に だ け ご 利用 に な っ て い 
る パソ コン を 、 売上 げ 伝 村 の 整理 や 給与 計算 な 
ど 実 務 的 に 幅広 く 活用 し た いと お 考え の 場合 、 そ 
の た め に は どの よう な ソフ トウ ェ ア が 適し C い る の か 
また 周辺 機器 は どれ が 必要 に な っ て 〈 る の か な ど 
色々 と 問題 が あり ます 。 そ うい う 間 題 に 対し 、 パス コ 
ッ ト イ ン で は 、 即 、 対 応 で きる 体制 を 整え て お り ま す 。 
同じ パソ コン で も 、 ソ フト ウェ ア や 周辺 機器 の パリ 
ェ ー シ ョ ン に より 、 発揮 す る 力 に 大 き な 差 が 生じ ま 
すす ,。 パ ソコ ン は シス テム で 捉え る も の 、 ノ パス コッ ト グ ソ ルレ 
ー プ ' は 、 単 な る マシ ン を 販売 する の で は な 〈、 ト ー 


方 へ 。 

ハー ド 、 ソ フト を ツー ル と し て 自分 自身 の 手 で 独自 
の オリ ジ ナ ル ・ ブ ログ ラミ ング を 試み た いと お 考え 
の 自作 派 エ キス パー ト の 方 、 パ スコ ッ ト イ ン で あな 
た の 求め られ て いる ツー ル 見 つけ て 素 晴 し い プ ロ 
グラ ム を 開発 し て くだ きい 。 特 に 基本 ソフ ト は 、 パ ス 
コッ ト ・ ソ フト ウェ ア ・ セ レク ショ ン 包 て あら ゆる 要求 に 応 
える べく 増 々 充実 し し きま し た 。 UCSD PASCAL 
を は じ め と し て 、C compiler、FORTH な ど NEC 
PC シリ ー ズ に 関す る あら ゆる 基本 ソフ ト 、OS、 加 
えて ユー ティ ティ な ど を 豊 滞 に 用 意 い た し て お り ま 


の パス コッ トス クー ル (BASIC コ ー ス ) を 用 意 し て 
お り ま す 。 

ッ パ スコ ッ ト グ ルー プ " は 、 ノ パ ソコン を あな た に と っ て 、 
より 身近 な も の に 感じ と っ て いた だ 〈 た め 強 力 に バ 
ッ ク ア ッ プ ' い だ し ます 。 


タル 的 に シス テム と し て 提供 いた し て お り ま す 。 (5 ち 
ろ ん メ ン テ ナ ンス 体制 も 万 全 。) ソフ トウ ェ ア に 関 
し て は 、 既 製 の パッ ケー ジ は も と より 、 さま ざま な ニ 
ー ズ に フィ ッ ト し た オリ ジ ナ ル ソ フ ト の 開発 も 承っ て 
お り 、 実 務 派 の 皆様 に 幅広 く ご 利用 いた だ け ま す 。 


す 。 ま だ 、PASCAL を は じ め と し て 各種 言語 の セミ 
ナー ぅ 開講 いた し て お り ま す の で 友 分 に ご 利用 く 
ざる きい 。 


ビジ ネス : エ キス パー ト い 
PC-8800 ヨ リー スズ 
本 体 価格 \228.000 
国内 実績 No.1 
PC-8000 ヨ リー スズ 
本 体 価格 \168,000 
学習 、 ホ ー ム ユー ス に … 和 驚異 的 低 価格 6 実現 


PC-6000 ヨ リー スズ 人 寿 絡 ygg.soo 
人 W あ C マイ コン ショ ッ プ 


ノ ヾ スコ ッ ト イ ン お 茶 の 水 /〒|01! 東 京都 千代 田 区 猿楽 町 2-2-3NS ビ ル 容 03-293-|391 
ノ ヾ スコ ッ ト イ ン 大 宮 /〒330 大 宮 市 高 鼻 町 !-40 共栄 セン トラ レビ ル 容 0486-44-6326 
ノ ヾ スコ ッ ト イ ン 土 清 /〒300 土 浦 市 桜町 !-13-3 ノグチ ビル 傘 0298-24-2700 
ノ ヾ スコ ッ ト イ ン 千 葉 /〒260 千 葉 市 弁天 町 279-2 小川 ビル 容 0472-53-877|1 
ノ ヾ スコ ッ ト イ ン 静 岡 /〒420 静 岡市 横田 町 |-!-18 花城 ビル 容 0542-55-707| 
パス コッ トイ ン 浜 松 /〒432 浜 松 市 管 原町 中 -43 第 2 堀留 ビル 会 0534-54-3974 
ノ ヾ スコット イン 沼津 /〒410 沼 津 市 大 手 町 2-9-3 蓮池 学園 ビル 容 0559-63-9711 


日 興 通 信 株 式 会 社 クー ソナ リノ レコ ンピュータ 事業 部 


〒101 東京 都 寺 代 田 区 猿楽 町 2-2-3 NS ビ ル 容 03-293-1391 


ADO MIGOM SHOP 


Se 


パー ソナ ルコ ンピュータ か ら 自 作 コ ンピュータ まで お 任せ 下さ い 。 


UD ビ ー ク 


両面 エニ バー サル ディ スク コン トロ ー ラ 


e MB8877 使 用 5 
し 補 ス 
も パレ ー タ 内 蔵 

@ 片面 、 両 面 、 単 密 
倍 密 可能 

@ 4 大 まで ドラ イ 
プ 可 能 

@ 倍 トラ ッ ク も 可能 


@UD-XL 才 と 組合 わせ て FM-8 用 フロ 
ッ ピ ー と コン パチ の シン グル ダブ プル 
ディ スク ドラ イブ が で きま す 
Y 49.800(〒1.000) 


外形 寸法 
コ 150X85X 240zm 
73x 234X 450m 色 ア イ ポ リー 
色 ア イ ポ リー プ ム 足 付 
プ ム 足 付 Y 5.400(〒1.000) 
1 訓 用 メ ク ラ 板付 1 
に ニー MDC 2 し 
Y 19.800(〒1.000) 150X 85X 280gm 
色 ス カイ プ ブルー 


Y 5.700(〒1.000) 


AP ロー ク 


アッ プル DISK II コン パチ ブル 
ディ スク ドラ イブ 


@JK873D 使用 ケー ス 、 


ケー ブル 付 

@ ドライブ プ コ ント ロー ラボ ポー ド は JK 873 
D の 基板 改造 に よる た め ロ ー コ スト 

@ 完全 調整 済 で す \89.800 (〒1.000) 


U り ローXLー ル 2 


両面 倍 密 ユニ バー サル ディ スク ドラ イブ 


@YD274 使 用 、 電 源 ケ ー ス 付 @MZ80K 
C/B、FM-8 MBC-100 等 ! 
Z 80 に 使用 する 場合 MZ-80SFD と 全く 
同一 に 使用 で き 4 吾 まで 拡張 可能 


画 MZ80B の 場合 
MZ8BK  Y19.800 
MZ80BFI Y38.000 
MZ8BDM Y10.000 
80B 専用 ケー ブル 80K/C 専 用 ケー ブル 

Y 3.200 Y 3.800 
UP-XL 以外 に 以上 が あれ ば 動き ます 
Y81.000 (〒1.000) 


田 MZ80K/C の 場合 
MZ801/O0 Y19.800 
MZ80F I/O \27.000 
MZ80FMD Y10.000 


田 表 示 価 格 は 7 月 の も の で す 。 そ の 都度 お 問い 合せ 下さ い 。 


田 填 冊 販 売 も 行なっ つて お り ま す 。( 担 当 戸塚 ) 〔 例 JPC8001I 32K 初回 \17.455 残 \I6.600X9 回 支払 合計 \1I66,855 


らら SYー01 シティ ッ ー 


VOTRAX 社 SC- 01 使 用 モン トロ ニク ス 
準拠 イン ター フェ ー ス 信号 の た め プ リン 
タ と 同様 に し て 使用 で きま す 。64 種 の 発 
音 コ ー ド (1 一 3BYTE) の 組合 わせ に より 
あら ゆる 発音 が 可能 メモ リ 効 率 は 抜群 。 


3BYTE/1 SEC 電 源内 蔵 、 ス ピー カ ヘ ダ 
イレ クト 接続 Y 49.800(〒500) 
スピ ー ド マス ター68K 


教育 ・ 実 験 に 最適 ノ 


ゅ CP/M68000 フ ロス アテ アモン 
Y 39.800 


(〒500) 


ミニ フロ ッ ピ ー 専 用 単 ・ 倍 密 

イン ター フェ ー ス ポ ボード 

MB8866 使 用 デー タ セ パレ ー タ 内 蔵 
Y52.000(〒1.000) 


ADO 


代田 区 外 神田 2-4 一 6 
ング ササ ゲ 7F 大 03-253-8307 


i 度 用 


7 

f 代 田 区 外 神 田 1 に 
F 容 03-257-0468 
区 外 神 田 3 10 一 7 
F 容 03-255- 9515 


軒 本 社 ・ 営 業 部 
〒101 東 』 
ビル ディ ング ササ アゲ 7F 


T 代 田 区 外 神 田 2ー4 一 6 


1 容 03-257-1025 


COMMAND LANGUAGE 


PC-PAL 


2 ソコ ン 用 ツ フ ト の PC-PAL (ビー シー・ 
パル ) さえ あれ ば 、BASIC を 知ら な い 方 に 
で も 業務 に あっ た プロ グラ ム が 数 十分 で つく 
れ ま す 。 表 ・ グ ラフ 作成 、 検索 、 並べ 替え な ど 

- 般 事務 に 必要 な 作業 を 1 つの コマ ンド と 
し て 用 意 。 使 う 方 の アイ デア で 、 フ パソ コン 活用 
を 無限 に 拡げ ます 。 念 PAL- I (50.000)・ 


機能 画面 移動 、 完 全 画 面 編集 、 フ ァイル 
作成 、 検索 ・ ツ ー ト 、 帳票 作成 、 タ テ ・ ヨ コ 計 
算 、 デ ー タ の グラ フ 化 な ど 欠 PAL- II (\98, 
000) ・ 機 能 プ PAL- 1 の 機能 を きら に 強化 、 
ソー ト 、 メ イク ファ イル の 高速 処理 、 コマ ンド ・ 
計算 式 の カタ ログ 化 、 フ ァイル の マー ジ 機 能 、 
小計 計算 の レコ ュー ド 化 、XY プ ロッ タ の 接続 
機能 、 デ ー タ ファ イル の コピ ー 機 能 、 画面 表 
示 項 目 の 選 択 、 シ ー ケ ン シ ャ ルフ ァイル と デー 
タフ ァイル の 変換 機能 、 ヨ コ ュ 計算 時 の カッ コ 、 
関数 の 使用 可能 な ど 錯 PC-PAL に は 、 べ ん り 
な ユー ティ リティ シリ ー ズ も 豊富 に 揃え て いま す 。 
※ NEC-PC8000、8800 シリ ー ズ に 搭載 で きま す 。 


houEcr MANAGEMENT SOFT WARE 


PC: PERI 


プロ ジェ クト の 効率 的 な 進行 管理 技法 、PERT 
シス テム は 、 従 来 大 型 コ ンピュータ に し か 搭載 
で きま せん で し た 。 こ れ を パパ ソコ ン で 使え る よう 
に し た の が 、 新 発 売 の PC-PERT で す 。 操作 
は 簡単 な 対話 型 な の で 、 初 め て の 方 で も 最適 
な スケ ジュ ー ル 管理 が 行 な を ます 。 納 期 が 決め 
られ て いか たり 、 複 雑 な 工程 を 持つ プロ ジェ クト な 


ら 、 どん な 業種 に も 応え られ ます 。 作業 途中 で 
の 計画 変更 、 作業 開始 か ら 終 了 ま で の ネッ ト 
ワー ク 作 成 、 最 遅 ・ 最 早 の 日 程 作成 な ども 手 
軽 に 行 な な た 、 スケジュ ー ル 管理 を 確実 な も の と 
し ます 。(\98.000) 人 機能 プ カ レ ンダ ー の 設 

定 ・ 修 正 、 プ ロジ ェクト の 設定 ・ 修 正 、 計画 作 
成 (最早 日 程 ・ 最 遅 日 程 ) 、 管理 諸表 作成 
(カレ ンダ ー、 プ "ロジ ェクト 管理 表 、 プロ ジェ ク 
ト 日 程 表 グラ フ 、 プ ロジ ェクト 達成 率 表 グラ 
フ ) 、 プロ ジェ クト の 工程 ネッ トワ ー ク 設定 、 プ 
ロジ ェクト ・ ネ ットワーク 図 の 画面 表示 、 プ ロジ 
ェクト ・ ネ ットワーク タク 図 作図 、 計画 変更 要因 設 
定 、 実 績 設定 ※NEC・PC8800 シ リー ズ に 搭載 で きま す 。 


w 
の O 


S 以 詳 光 


> テ 9 べ く 雪 NNUN 


2 洗 
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さ 
も 
ひ 
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味 
台 
2 
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の 氏 天 塚 商会 


本 社 〒101 東 京都 千代 田 区 三崎 町 2-12-1 誠 03(264)7111 
大 阪 支社 〒531 大 阪 市 大 淀 区 大 淀 南 1 一 10 一 6 容 06(458)6021 


大 塚 0A セ ンタ ー 天 塚 0A シ ョ ッ プ 


社会 03 (264)3811 
八重 洲 容 03(28!)4711 


浜 枯 045(453)I338 田 


立 川 容 0425(27)6411 
大 宮 富 0486(45)5521 
大 阪 容 06(458)2501 


新宿 登 03 (366)2I6I 
八王子 容 0426(26 )6301 
端 容 03(8I0)1511 
越谷 容 0489(87)1711I 
船橋 会 0474(34)5211 
松 

コ 

沢谷 0466(27)8151 


お 問い 合わ せ は 容 03(264)3811 


右記 の 請求 券 を ハガキ に 貼り 、 本 社 企画 室 
まで お 送 9 く だ さい 。 詳 し い 資料 を お 送り し ま も 


//// 吉 の 類 ラ 。 な ん で ち 券 う ラ / 
だ ソーク ショッ プー レン ョ アン グー 


群 を 抜い た 価格 / マ ル ゼ ン オ リ ジ カ レシ ステ ム / 


と 


マル ゼン オリ ジ ナ ル 改 造 版 APC PC-800| 本 体 標準 価格 半 168,000 


二 ナシ ョ ナル 11 イ ンチ TH-11S6 
APC PC-880| 本 体 標準 価 格 \228.000 


0 昌 


NMAANRANNN ーー CK 
0 ra * 30 回 分 割 払 価格 \251.600 頭金 \24.800 初回 \3.200 
2 回 以降 \3.400X24 回 ボー ナス 月 \28,400X5 回 
と の 組み 合せ (32K RAM) 半 181800 
30 回 分 割 払 価格 \225.300 頭金 \4.800 初回 \5.200 


有 4 と の 組み 合せ \\263.000 2 回 以降 \5.700X24 回 ボー ナス 月 \15.700X5 回 


30 回 分 割 払 価格 \320.200 頭金 \43.000 初回 \5.400 


2 回 目 以降 \4.200X24 回 ボー ナス 月 \34.200X5 回 
と の 組み 合せ \243.000 
30 回 分 害 払 価格 \300.000 頭金 \22.800 初回 \5.400 
2 回 以降 \4.200X24 回 ボー ナス 月 \34.200X5 回 


FUOJIT ち ちり MI で CO[ 四 | 
本 体 標準 価格 学 つ 18.000 


| 4 と の 組み 合せ 
30 回 分 割 払 価格 \280.000 頭金 \28.000 
月 々 わずか \3.400X25 回 ボー ナス 月 \33.400X5 回 


\228.000 


と の 組み 合せ 2 人 18,.000 
30 回 分 割 払 価格 \257.400 頭金 \18.000 初回 \6.300 
2 回 以降 \3.900X24 回 ボー ナス 月 \27.900X5 回 


支 画面 切り 換え ワン タッ チ 
家庭 用 カラ ー テ レビ 守 
マイ コン 用 カラ ー デ ィ ス プレ イ 
文中 解像度 一 鮮明 画像 


マル ゼン オリ ジ ナ ル 
12 イ ンチ グリ ー ン テディ スプ レイ 
標準 価格 学 39.8OO-_ 


どど 


支場 所 を と ら な い 12 イ ンチ 
支 実 務 に 即応 2.000 廊 字 表 示 


エロ H ロ 所 へ DAS@PA 
本 体 標準 価格 半 163.000 


と の 組み 合せ \205,.000 
30 回 分 割 払 価格 \257.000 頭金 \5.000 月 々 \8.400X30 回 


ど と の 組み 合せ 182.000 
30 回 分 害 払 価格 \221.000 頭金 \32.000 月 々 \6.300X30 回 


National 本 体 標準 価格 半 54.800 


20 回 分 割 払 価格 \88.400 頭金 \5.800 初回 \4.700 


2 回 以降 \4.100X19 回 


立川 ター ミナ ルビ ル 店 (立川 駅 ビル 6F ) 


伯太 


に 堂々 オー プン / メ リッ ト い っ ぱい , スケ ー ル で っ か い オ ー プ ン イ ベン ト を 10 月 
2 日 人 )・3 日 (日)・4 日 (月 の 3 日 間 開 催 致 し ます の で 是非 一 度 ご 来店 下さ い 。 


員 


ET カテ ニッ 訓 


SH へ に PP AZC エロ 王 口 ! へ 
通 National 筐 Cppl ヲリ デ ィ 。。 


を と ^ 
ks 生 こ 、N も > る 
KN な 


N に 1 | 紀 
ンマ ウ N 
6 革 ヽ ドン ク | 呈 ロビ 
ヽ 分 03 (263) 3690 
2 > 用 3 レン で ペ 


か 


N 


下記 セッ ト の お 支払 い 例 は ほん の 一 例 で す 。 
ボー ナス ー 括 払い か ら 60 回 均等 払い 等 いろ 


いろ …。 お 支払 い は 係員 に ご 相談 下さ い 。 
セッ ト の 組合 せ も 一 例 で す 。 こ の 他 エ プン ソン 
ン 等 の プリ ンタ ー 及 び シ ャ ー プ の カラ ー モ 
ニタ ー 等 と の 組合 わせ も お 作り し ます 。 
必要 な も の すべ て まとめ て クレ ジッ トー クノ 
PC-8801 

Po-8001 | の 各 セ ッ ト を お 買い 
FM-8 上 げ の お 客 様 に 


世界 初 の 画 期 的 な 独習 教材 


マ ィ コン 沙 著 入門 編 


基礎 編 
を 期間 中 に 限り 
特別 サー ビス ング 


MT 95DOHGER 6 


P88 ビ FE 


て PC-880| 


GII 


【 内 容 】 1 箱 サ ー ビス 
PO-880| 本 体 … … \228,000 
Py CDM-1480X… ・\182,800 
MP-80IF/T(PO-880| 用 )・ \153,800 
CS-66|( ア ダ プ ター 付 ) … \18,400 
【 お 支払 い の 一 例 】 
\6.000x59 回 
【 内 容 】 
PO-880|… … \228,000 
PO-8044… eeer \13,500 
【 お 支払 い の 一 例 】 
\5.200 x29 回 
HER \7.820 
…… \28,000X5 回 


プター 用 紙 
【 内 容 】 ザー ビス 


 MZ-|200 ・ \148,000 
p MZ-801/O- …\29,800 
 MZ-80KP5 セ ッ ト … … \168,000 
【 お 支払 い の 一 例 】 


・ \3.500 X59 回 


ご 来店 で き な い 方 は 


See 


の ヽ 、* ク レジ ッ ト を ご 希望 の 方 は 御 一 直下 さい - 
ご: い 、 山 ア スタ ー イ ンタ ー ナ ショ ナル 
コス モス 秋葉 原 


ヽ 
泌 ^、〒」0 東 京都 陸 代田 区 外 神田 |-|「-6 小 幕 ビ リル 5F 


現金 書留 に て 御 注文 の 場合 住所 ・ 氏 名 ・ 電 話 番号 と 商品 名 を ハッ 
キリ と 書い て 、 商 品 価格 十 送 料 の 合計 金額 を 送っ て 下さ い 。 

銀行 振込 に て 御 注文 の 場合 下記 銀行 口座 へ 商品 価格 と 送料 の 合計 
を 振込 ん で 下さ い 。 振 込 後 ハ ガキ に て 住所 ・ 氏 名 ・ 商 品名 を 忘れ ず に 


さ 、※ 振 込 先 : 協 和 銀 行 新宿 支店 当座 No406833 


プレ ジット フェ アー 


本 セッ ト お 買い 上 げ の お 客 様 に も ち れ な く 
下記 2 点 サ ービス 


FUJIT 戸 びり 


0( の て o】 


10 イ ンチ プリ ンタ ー 用 紙 
(1.000 枚 入 ) サ ービス x 


15 イ ン テ プ リン ター 用 紙 2.000 枚 入 ) ニン : あ 0 
』 に \4。800 CDM- 140RX ・\110,000 
〇 プラ ンク ティ スケ ッ ト (10 枚 入 ) \ 33,000 PP シリ アル ドッ トブ リン ター (ケー ブル 付 ) 
【 内 容 】 ーー ・\ 142,000 
PFM-8 本 條 に en ・\218,000 人 こい 
カラ ーCRT デ ィ ス プレ ー( ケ ー ブ プル 付 ) "\1892000。 ん \4.900x59 回 
8 イン チ デ ィ ス ク ユ ニッ ト ・ ・\440.000 。 ぁ 礼 会 人 …….\7.060 


同上 用 アダ プター-・ 
ビジ ネス プリ ンタ ー・ 
か プロ ジン ドモ 2230e あ 本 02 2 
キャ ラク タ セ ッ ト ( 漢 字 ・ 非 漢字 ) 
【 お 支払 い の 一 例 】 

e 月 々 … 
初回 金 … 
る ボー ナス 月 ・ 


和香 ー 用 紙 (1.000 枚 入 ) 


1 箱 サ ービス 
【 内 容 】 
PC-880|・ ・ \228,000 
PC-8851… ・\58,800 


p MP-80 中 (PC-8801 用 )・ \143,800 


CS-66|( ア ダ プ ター 付 )… "\18,.400 
【 お 支払 い の 一 例 】 
e 月 々 … \4.500x59 回 
@ 初 回 銘 orooeeoeeheheeeee Y9,600 

* ボー ナス 

NN】 

P88 ビ ジネス A セ ッ ト 
【 内 容 】 
PC-8801(CPU)… … \228,000 
か PC-8822… \234,000 
p PC-8853… \215,000 
PO-888|・ ・\442,000 


PC-8801- 01 (本体 用 漠 字 ポー ド ) \38,000 
【 お 支払 い の 一 例 】 


@ 月 々 … ・\\12.700x59 回 
@ 初 回 金 … ee \13,500 
わ ・\70,000XI0 回 


本 セッ ト お 客 様 に 下記 2 点 を も れ な く サ ービス 


910 イ ンチ プリ ンタ ー 用 紙 (1.000 枚 X2) \4,000 
〇 プラ ンク ディ スケ ッ ト 両 面 倍 密 度 (0 枚 入 ) \ 33,000 


プリ ンタ 用 紙 
【 内 容 】 サー ビス 
パソ ビア 本 体 (T-BASIC)………… \163.000 


・\ 58,000 
・\ 350,000 
\89.000 
・ \ 40,000 


@ ボー ナス ・\30,000XI0 回 


…\14.800 x59 回 
YI5,600 
"\85,000X10 回 


困 和 7 年 10 月 1 日 
大 和 5B 年 3 月 81 日 


ャ ボ ポ り 回 


の 


娘 10 イ ンチ プリ ンタ ー 用 紙 
(1.000 枚 入 ) サ ービス 文 


【 内 容 】 

PFM-8 本 体 … の tt \218,000 

富士 通 グ リー ン CRT (ケー プル 含 ) 
0649 和 03 io.S3s の 0 \47.200 

PGP-250F( ケ ー ブ プル 含 )… \ 93,900 

CS-66I|( ア ダ プ ター 付 )… \18,400 


【 お 支払 い の 一 例 】 


・\3.900x59 回 


\218,.000 
家庭 用 TV アダ プター…… \13.500 


\24,000X5 回 


(、P88 ビ ギ ナ ーB セ ッ ト | (P80E ギ ナーA セ y ト (、P8O ビ ギ ナ ーA セ ッ ト | ( P6O ホ ビーA セ ッ ト | 


ブリン 2 ー 用 紙 (1.000 枚 入 )1 箱 サー ビス AM PC- 6OO1 


DO 1 
p PC-8049K( ケ ー プル 付 ): 
p MP-80IIIF/T(PO-8001 用 ) 
CS666I( ア ダブ ター 付 )…… 
【 お 支払 い の 一 例 】 


\177,800 
\159,800 

\152,800 
… \18,400 


\8,060 


ンチ プリ ンタ ー 


e ボー ナス .\ 30,000XI0 回 【 内 容 】 紙 1 箱 サ ービス 

と PO-600|・ …\89,800 

PPO-6042・ Y69,800 

P8O ビ ギ ナ ーB セ ッ ト PGP-80P … Y76,500 
と ビデ オ コ マ ンド ・ … \8, 

APC PC-800I 【 ゅ 払い の 一 例 寺 

月 々 … \4.300x29 回 

@ 初回 金 ・ \4,780 

e ボ ポー ナス Yz6,000x 5 回 


-(CP60EーB セ ッ ト | 


es) イ ンチ プリ ンタ ー 
【 内 容 】 用 紙 1 箱 サ ービス  【 内 容 】 
と PC-8001(32KB)・ WI77.800. : 選 036001・ 97800 
PC-8050K………… \ 39.800 p PC-6006・ \14,000 
PGP-250F( ケ ー ブ ル 付 ) 962500 - PO-6082 や いい 7 
GS-661( ア ダ プ ター 付 )… …\18.400 ビデ オ コ マ ンド ・  \8.800 
【 お 支払 い の 一 例 】 ppN 
5 、\6.000x e 月 々 - ・\4.600X29 回 
@ 初回 金 OU @ 初回 金 … \6,460 
@ ボー ナス \36,000X5 回 


M2O ビ ギ ナ ー セ ッ ト 
I1Z-0)⑪ 人 0 


カラ ー デ ィ ス プレ ー(PA7I60) …\80,800 MZ-2000 …・ \218,000 
(ケー ブル 付 )  MZ-IU0I… \39,000 

ドッ ト プ リ ンタ ー1(PA7250) …\73,.800 MZ-IROI……… \39.000 
(ケー ブル 付 )  MZ-IR02( X2)… … \8,.000X2 

【 お 支払 い の 一 例 】 【 お 支払 い の 一 例 】 

月 々 … ・\5.000x29 回 e 月 々 … 

@ 初回 金 … \8,880 初回 金 …(… 層 人 家 ー ド ーー 

@ ボー ナス \36.000X5 回 @ ボ ポー ナ ス ・ 


営業 時 間 プ AMI0:00 一 PM6:00 
定休 日 毎週 木曜 日 
Ah 


N 係 


PHONE(03)257-0512. 


we: 〒I0I 東京 都 千 代田 区 外 神田 2- 


コス モズ ス 和 萩 葉 原 


〒I|0 東京 都 千 代田 区 外 神田 !- 中 -6 小 暮 ビ ル 6F PHON(03)257-0512 


# プス ヨー イコ コー ゴミ ヨゴ リル 


電話 に よる 問い 合わ せ 、 ご 注文 
| を zewis 00 一 PMI:00 を さけ 
て 下さ る よう お 願い 致し ます 。 


!4-10 第 2 電波 ビル PHONE(03)257-0128 穫 


購入 し て いた だ いた お 客 様 に 、 
お 渡し し て いま す 。 
COSMOS メ ン バ ー ズ カー ド お 持ち の 方 に 
は 、 店 内 の ハー ド (GOLD カ ー ド )、 
(GOLD、SILVER カ ー ド ) を 会 員 価 格 で 
販売 する 等 いろ いろ 特典 が あり ます 。 


CHI ちら 


内 ょ て エコ 
メン バー ズ カ ー ド 進呈 . 

今 COSMOS 秋 葉 原 で マイ コン 関連 ハー ト 
ウェ ア 及 び ソ フト ウエ ア を ある 金額 以上 


カー ド を 


アプ ャ 


あな た も 1 枚 …。 


7 号 店 で は 、 私 だ ち 
マイ コン レデ イ が 

みな る ん の 質問 に 
や さ し く お 応え し ます 。 


ツク モラ ジオ セン ター 店 (電卓 、 ポ ケ ュ ン 、 受 令 機 専門 店 ]…… ーー 会 03-251-2657 
ツク モニ ュー 秋葉 原 セ ンタ ー 店 〔 マ イ ュ ン 専 門 店 ] eroererrttTT 会 03-251-0986 償 
ツク モ 万 世 上 店 (通信 機 専門 店 

ツクモ 技 術 開 発 セ ンタ ー 配送 セン ター 


NN 回 回 MMNHI 


ツク モ 5 号 店 〔 マ イ ュ ン 通信 機 ]…… ド rg 盆 03-251-0531 ) 
ツク モ 名 古屋 店 (エイ ミシン ナ ーー ドド ドド ドド EE 人 052-263-1681 

(通信 機 ・ キ ー デ ィ イオ) 会 052-263-1655 一 6 
ツク モ 7 号 店 〔 マ イ ュ ン 専 門 店 ]… ド ーー ドド TTP 会 03-253-4199 


即決 クレ ジッ ト ・ ツ クモ 全国 クレ ジッ ト OK / 内 の 
現金 特別 価格 で 各種 クレ ジッ ト が 利用 で きま す 。 残金 の み に 金利 が か か り ま す Mc) 池 狗 吉 株 式 
SS 会 


30 回 払い まで 出来 ます 。 但し 、| 回 の 支払 い 額 は 3. 000 円 以上 。 


その 場 で 、 お 持ち 帰り で きる クレ ジッ ト も あり ます ニュ ー 秋 茎 原 セン ター 店 〒|0I 東京 都 千代 田 区 外 神 田 !-16-!0 容 03(25!)0986 一 8 


名 古屋 店 3 F( マ イコ ン ) 〒460 名 古屋 市 中 区 大 須 3-30-86 容 052(263)1681 


N 証明 許 証 な ど )、 学 ぶよ びび 7 oi 証 が 
氏 カ 0 身分 証明 書 (免許 証 な ど )、 学 生 の 方 お よび 未成 年 者 は 賠 玲 の 62 5 号 店 マイ コン コー ナー 〒!0I 東京 都 千代 田 区 外 神 田 3-!-!4 佐 03(251)0531 一 2 
必要 で す 。 7 号 店 〒i0| 東京 都 千 代田 区 外 神 田 !-9-9 大 03(253) 4199 
画定 休日 東京 各店 は 毎週 木曜 日 と 第 3 水曜 日 、 名 古屋 店 は 毎週 月 曜日 


各種 クレ ジッ トカ ー ド 取扱 い 。 日 本 信販 、JCB、DC、UC、VISA 


ジョ ジグ 肥 只 / 


日 本 橋 二 ノミ ヤム セン 


ーーー 


/ 
GR ふ 受 3 
充実 し た 講師 陣 が 指導 教材 : シ ャ ー プ <MZ-80K2>. NEC<PC-8001>. 
富士 通 く <FM-8>. 日 立 < レ ベル > 


パン ソコン の 基礎 理論 か ら パ ソコ ン を 使用 し て 会 場 : 日 本 橋 ニ ノミ ヤ EL ホ ビー 店 


の 実習 で 、BASIC 言 語 に よる 基礎 プロ グラ 毎週 ⑧ 開 
ミン グ テ ク ニッ ク を ご 指導 いた し ます 。 Me re 


入門 コー ス :BASIC を 全く 、 ま た は ほとん ど 知 お 中 し 込み は - に 
ら な い パ ソン コン 未経験 の 方 。 ニノ ミヤ パソ コン 教室 


応用 コー ス : 入 門 コ ー ス 受講 者 、 また は 関数 以 大 阪 
外 の BASIC の 基本 命令 を 理解 し 、 0B" ae 
パン コン に プロ グラ ム を 入力 で き 


る 方 。 まだ は パソ コン 売場 まで 。 


@ 一 9 ジャ ン ボ ね な お 品 揃え 【 】 地下 鉄 堺 功 縁 恵美 湖 町 駅 下車 徒歩 約 2 分 


に ミソ ベリ / 


ET ・。 、 本 ワヤン ポー ニン ノミ ヤ 本 店 

人 @ 大 阪 市 浪速 区 日 本 橋 4-11-4 久 谷 06-643-2031 久 
ニノ ミヤ ビ L ホ ビー 店 
錯 大 阪 市 浪速 区 日 本 橋 5-6-19 久 谷 06-643-1681 偽 
ニノ ミヤ バー ツ 店 

@ 大 阪 市 浪速 区 日 本 橋 4-9-14 久 合 06-643-2039 
@ 上 記 3 店 の ほか 、 下 記 ニ ン ミ ヤ 8 店 で も 取扱 つて お り ま す 。 ) 
姫路 店 : 傘 0792-94-5363. 和歌 山 店 : 容 0734-32-5121. 藤井 寺 店 : 登 0729-39-9206. 


茨木 店 : 棒 0726-34-1151. 奈良 EL ホビ ー 店 : 佐 0742-23-3581. 神戸 店 : 容 078-391-6356. 生前 (、) 授 天 間 4 
香里 店 : 会 0720-32-2694. 京都 店 : 075-361-9166. 


タ 
腸 
が 
丘 
る 
シ 
巡 


池袋 東口 に 待望 の マイ コン 大 型 サ ービス 店 。 


マコ コピ ビ コ 


w ゃ トー > 
っ 当 9 
あめ を お 3 


好き 


Pe 


ー、 学 習 、 ば ジネス まで の NEC オ ー ル ラウ ンド 


寺 PC-8801 旬 モ ノ ク ロ 
CRT PC-8851 @ デ ー タ レコ ー 
ダー PC-6082 人 @ 漢 字 PC- 
8801-01@ 漢 字 プ リン ターPC- 
8822 カセ ッ ト 用 ワー プロ 「 文筆 」 
@ プ リン ター 用 紙 1.000 枚 サー ビス 
合計 570.000 円 

クレ ジッ ト の 1 例 頭金 0 円 ロー プロ 


月 々 わずか 7.200 円 X60 回 
ポー ナス ーーーーm デ ーーー ーー コー ス 


@ 本 体 PC-8001(32K) @ カ ラー 
14' 高 解 度 CRT @ デ ー タ レコ ー ダ 
ー @EPSON 専 用 プリ ンタ ー @5" 
フロ ッ ピ ー テ ディ スク ( 両 倍 ) 人 @ 拡 張 
ユニ ッ ト @ プ リン ター 用 紙 各 接続 
ケー ブル 類 ・ スケ ッ ト 10 枚 サー ビス 
合計 700,000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 9.400 円 X60 回 
ボー ナス 40.000 円 X10 回 


性 能 の 王者 、SHARPF。 PTPTTTTTTTWT CPP 


@MZ-2000 @ グ ラフ ィ ッ 急 MZ-1200 
クボ ー ド @ グ ラフ ィ ッ ク 旬 SEIKO 


@ MV -2000 

(本 体 オ グリーン CRT 二 カセット ) 
合計 218.OOO 円 ( 応 相 談 ) 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 4.500 円 ぶ 60 回 

ボー ナス 円 

@M ズ -1200 

(本 体 オ グリ ー ン CRT 二 カセット ) 
含 軒 148.OOO 円 ( 応 相談 ) 
クレ ジッ ト の 1 硬 頭金 0 円 
月 々 わずか 3.400 円 ぶ 50 回 

ポー ナス 0 円 


< ア コン ピュ ー タ ー の 王者 、 富 士 通 アグ きす が は 総合 か 
0A の 王者 東芝 。 


@ 本 体 マイ クロ -8 久 専用 
グリ ー ン CRT 久 専 用 カセ ッ ト 
@ プリ ンタ ー @5" テ ディ スク 装置 
@ 高 性 能 ワ ー プ ロ 「 SB ご 」@ 
漢字 ・ 非 漢字 セッ ト @ 接 続 ケ 
ー プ ブル 類 、 用 紙 一 箱 、 デ ィ ス 
ケッ ト 10 枚 サー ビス 

合計 73O,OOO 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 、 8.400 円 X60 回 

ポー ナス 50.000 円 10 回 


で < アク 三菱 の の 世界 に 
総 誇る 技術 力 


合力 の 結 品 、 
本 格 16 ビ ッ ト 。 
@MULTI16 
@ 潤 字 プ リン ター 
含 計 1.400,000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 17.200 円 X60 回 
ポー ナス 90.000 円 X10 回 
5 年 リー ス で 月 々 31.080 円 


メモ リ X2 @ プ リン ター 


フロ ッ ピ ー テ ィ イス ク 
人 @ 拡 張 |/O ポート 
合計 780.000 円 
クレ ジッ ト の 例 頸 多 0 円 
月 々 わずか 7.900 円 60 回 


ボー ナス 60.000 円 X10 回 


100 万 の 壁 を 破っ た 
本 格 ワー プロ シス テム 
@ マ イオ アシ ス 

合計 750,000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 6.800 円 X60 回 
ポー ナス 50.000 円 X10 回 
5 年 リー ス で 月 額 14.950 円 


No.1 企業 、 日 立 。 
ベー シッ クマ スタ ー 
レベ ル 3 マ ー ク II 

@ 高 解 度 カラ ー 

ディ スプ レイ 


合計 330.000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 4200 円 X60 回 


プリ ンタ ー 
GP-80D(N・EX) 


合計 204.000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 4.600 円 X60 回 
ポー ナス (円 


@ ペ パン ビア 

@ グ リー ンジ CRT 
合計 186G,OOO 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 4.200 円 ぶ 60 回 
ボー ナス 0 円 

@ バ パン ビデ 

@⑯ ファ イン カラ ーCRT 
合計 2S5.OOO 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 、 3.400 円 60 回 
ポー ナス 20.000 円 ※10 回 


アク 知る 人 ぞ 
知る 世界 の 名 機 、 


世界 一 の ン フ ト 。 
@APPLE 
II-JPLUS 
@11' カ ラーCRT 
合計 430.000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 6.500 円 X60 回 
ポー ナス 20.000 円 10 回 


ご 期待 に 


@ 本 体 PC-6001 

@ 家 庭 テ レビ ケー ブル サー ビス 
合計 88.OOO 円 

クレ ジッ ト の 1 例 頭金 0 円 

月 々 わずか 3.000 円 36 回 

ボー ナス 0 円 


@⑯16 ピ ビット N5200 モ デリ レ 05 

@⑱ ディ スプ レイ 、 キ ー ボ ー ド 、 デ ィ ス ク 1 台 
シス テム 含 計 788.OOO 円 
クレ ジッ ト の 1 例 頭金 0 円 

月 々 わずか 8.900 円 60 回 

ポー ナス 50.000 円 6 回 


応え て 、 天 下 の 松 下 。 


16 ビ ピット 機 マイ プレ ー ン 3000 入門 機 @JR-100 


@ 本 体 5' テ ィ ス ク 装 軒 


@12 "グリーン CRT 
@ シ ステ ムン ソフ ト 

合計 480.000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 6.100 円 X50 回 
ボー ナス 40.000 円 X8 回 


人 入門 に 
3 台 目 に 6 ビッ タリ 。 


KK H ロ ご - 20 


@ マ イク ロカ セッ ト 
含 計 1G4.4O0O 円 


クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか み 、 4.500 円 36 回 


ポー ナス 0 円 
@EEPSON H ご -20 
合計 138.6OO 円 ( 


クレ ジッ ト の 1 例 。 頸 金 0 円 


@TV 用 RF コン バー ター 
含 計 58.OOO 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 3.300 円 メ 20 回 
ポー ナス 0 円 

@s び R 尺 -200 

@ カ ラーT ソ アダ プター 


含 計 GS.OOO 円 
クレ ジッ ト の 1 例 頭金 O 円 
月 々 わずか 、 3.300 円 24 回 
ポー ナス 0 円 


5 | プア fe | 
に は 、 絶 大 な る 
信頼 と 巨大 な 人 気 。 
@ 沖 電気 
if800 モデ ル 30 
合計 1.320,000 円 
クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 17.000 円 X60 回 
ボー ナス 80.000 円 X10 回 
5 年 リー ス で 月 々 29.530 円 


( 応 相 諾 ) 


応談) 


月 々 わずか 、 3.700 円 ※36 回 


ポー ナス 0 円 


て み 疎 惑 的 


< 超 低 価格 、 
高 性 能 の 伝統 、 


ホビ ー ワ ー ル ド 、 
独自 の 強力 技術 。 強力 な る カシ オ 。 
コモ ドー ル VIC-1001 @FP-1100 
@ カ ラーCRT @ カ ラーCRT 
カセット ドライブ 合計 175,000 円 
合計 138.000 円 クレ ジッ ト の 1 例 頭金 0 円 


クレ ジッ ト の 1 例 頭金 0 円 
月 々 わずか 4.700 円 X36 回 
ポー ナス 0 円 


月 々 わずか 5.900 円 X36 回 
ボー ナス (円 


ボー ナス 20.000 円 X10 回 


務 本 ? ぞ 納 / 
電導 1 の を 国 罰 
牟 金 が レ 。/ ご 需 望 の 機種 が 決ま り まし 
が 氏 料 ・ た ら 、 さ っ そく お 電話 か 、 お 
遂 は が き で お 申し 込み くだ さい 
お 申込 み 方 法 ① 商 品名 (メー カー、 型 番 ) ② 合 


の マコ コ リセ り 3-B0 


に 
/ テア トル 


計 金 額 ③ お 支払 い 方 法 ( ク レジ ッ ト ノ 現金 又は 本 
リー ス ) ④ ク レジ ッ ト の 時 … 月 払い 、 ボ ポー ナス 払い 、 あゆ 移 
ご 希望 額 お 名 前 ⑥ 年 令 ⑦ ご 住所 ⑧ お 0 ミ 人 03-880.1360 


9 請 ヒ ん 〒170 豊島 区 東池袋 1-21-5 
サン シャ イン シテ ィ ー 出 入口 前 


電話 番号 ⑨ 職 業 ⑩ 他 、 ご 意見 、 ご 希望 な ど を 
官製 は が き に ご 記入 の 上 、 上 記 宛 ご 郵送 くだ さい 


「 電 波 科学 」 は 、 オ ー デ ィ オ 、 ビ デオ 、 マ イ ュ コン 、 
ディ ジタル 技術 、 エ レク トロ ニク ス と 幅広 い 
ジャ ン ル に わた る アマ チュ ア 志 向 の 技術 誌 グ 


] 則 月 号 発売 中 * 定 価 5 8 0 円 〒95 
(毎月 14 日 発売 ) 


特集 マイ 8 ン 人 門 て 人 気 機種 パソ ュ ン の 徹底 研究 


市 場 に は 汎用 パソ コン が 何 十 種類 と 発売 され 、 ま た 関連 の ソフ ト 5 数 多く 発売 
| され て いる 。 ここ で は その 中 か ら 、 人 気 機種 5 機種 を 選び 、 そ れ ぞ れ の 機能 お 

よび それ ら の 比較 を は じ め ソ フト の 解説 な ど 徹 底 し た 紹介 を 行う 。 
文人 気 パ ソコ ン 5 機 種 の 徹底 紹介 に 
NEC 880| プ シャ ー プ MZ-2000 プ 富士 通 マイ クロ 8 
日立 ベー シッ クマ スタ ー レ ベル 3 マー ク II ノン 
東芝 パソ ピア 

文 簡易 言語 は どこ ま て 実用 的 か ? 

簡易 言語 の 上 手 な 利用 法 


文 マ イコ ン の 使い 方 ・BASIC 上 達 法 


WEEE:: 


PD 


く < マイ コン 関 車 記事 > 
画 電 : 江 邊 ド 学 の マイ コン 講座 


| < 第 10 回 > プロ グラ ミン グ 再 入門 (その 3) 
硬 ワ ン ボ ー ド マイ コン の 応用 
一 マ イコ ン キ ッ ト の 紹介 


_ マイコ ーー 


野口 新太郎 著 


マイ コン を 理解 する に は 用 語 を 理解 する の が は や 
| みち 。 初 歩か ら 順 を 追っ て 、 ソ フト ・ ハ ー ド ウエ 
| ア の 両面 か ら 、 用 語 を 中 心 に わか りや すく まとめ 

た 絶好 の マイ コン 入門 書 。 定価 9 5 0 円 〒250 


( 日 本 放送 出版 協会 】 


和泊 R や 


P an 
D 


H 


凌 皆 頭 凌 四 
H 紅 民 H 冊 H| 浴 


PIN 
HH 剛 H 隊 


v 周 咽 則 ] 韻 吉 呈 半 男 
困 


Ei 
es 
ロ 


る 凶 宮 4 お 条 // 
/ 号 機 了 HH 有 モテ ルコ 
2 


で 


電子 計算 機 セ ンタ ー 


一 年 制 


情報 処理 科 三信 簡 ( 重 ・ 夜 
情報 技術 生年 制 ( 量 ・ 夜 


門 ーー ン - ド ニ 3 

程 テマ 術 課 程 
映 像 和 
画 映 画 画 報 道 写真 画商 業 写 真 


デザ イン 科 
画 プ ラフ ィ ッ フク フ デ ザイ ン 再 商業 
デザ イン 吾 絹 集 デ ザイ ン 


美 術 
画 絵 画 画 皮 画 画 ア ニメーション 
画 イ ラス トレ ーション 


放送 制作 芸術 科 
画 カ メラ ・ 虫 明 画 三 フ サー・ 録 
音 呈 演出 古 ホー ルイ ベン ト ヒト 瑞 
ナウ ン サ ー 画 美術 制作 画 正 画 


ニー つ | ゃ 
演 嵐 笠 』 
画 俳優 画 三 コー ジ カ ル 画 演出 
画 舞 台 逢 作画 声優 

ーー フン に 
音響 芸術 科 
画 三 フサ 一 画 レ コー ディ ング ブ デ 
イィ レク 夕 亜 音 響 コン サル タン ト 


申 束 | 性 | 凌 


性 


怪 図 軸 


〈 入 学 関係 連絡 先 〉 
豆 |44 東 京都 大 田 区 西蒲田 5-23-22 電話 03(732)111I( 大 代表 ) 
日 本 工学 院 専門 学校 入学 相談 室 

学則 は 希望 学科 名 を 書い て 〒 料 共 700 円 


N 


靖 間 開 は 3 
NE だ 
doldkdledlulkdkdedhdkda 


交 通 国電 ・ 京 浜 東北 線 池上 線 目 蒲 線 蒲田 駅 下車 徒歩 3 分 


月 刊 ア スキ ー は 、 パ ー ソ ナル コン ピュ ー タ サイ エン ス を 中 心 に 、 業 
界 の ニュ ー ス 、 エレ クト ロニ クス 技術 解説 、 家庭 や 職場 で の 実際 
の 利用 方 法 ゲ ー ム …… な ど 、 あ ら ゆ る 分 野 を 網 維 し た パー ソナ 
ルコ ンピュータ 総合 誌 で す 。 初 心 者 か ら 上 級 者 の 方 まで 、 ホ ビー、 
実務 に 、 幅 広く お 読み いた だ け ま す 。 


好評 発売 中 ! 


わか りや すい ソフ トウ ェ ア 解 説 、 最 新 情報 な ど を 満載 


定価 480 円 (〒250 円 ) 


ぁ 主 な 内 容 
@ 特 集 ペ ー ジ @ASCI EXPRESS の BUSINESS TALK 代 ロ ー ド テ 
スト 欠 ア スキ ー セ ミナ ー 欠 そ の 他 、 ゲ ー ム プロ グラ ム や シス テム ・ 
ソフ ト 、 再 現 性 の 高い ハー ドウ ェ ア 製 作 記 事 な ど を 満載 。 
毎月 25 日 発売 定価 500 円 (〒100 円 ) 


月 刊 ア スキ ー 別 局 


OGINup。> 


*ー ン プン ノレ フン と ュー タ 入 炎 を ムー が する 、 


アス キー の 赤 と ン フト ウェ アン ケージ 


PC-8801BASIC 和 門 


BASIC の 基礎 か ら コ マン ド の 解説 、N。。-BA 
SIC の 特徴 と 能力 中 間 色 を 利用 し た グラ フィ ッ 
クス 、 入 出力 と ファ イル の 取り 扱い 、 Na』a-BAS 
1IC に よる ブロ グラ ム の 作り 方 … 等 、 初 心 者 か ら 
上 級 者 まで PC-8801 フ ァ ン 必読 の 書 ナ 。 


に ーー 
ビジ ネス ツ フ ト の 実際 
パー ソナ ルコ ンピュータ を ビジ ネス の 分 野 に 
導入 し て いく た め に 、 その 現状 、 特 性 、 シ ステ ム 
の 作り 方 、 可 能 性 な ど 、 今 まで の 手引 書 に は な 
い 「 カ ンド コロ 」 を 実例 に 即 し て わか りや すく 解 
説 し て いま す 。 


入門 CP/M" 


8 ビッ ト の 世界 で は 最も ポピュラー と いわ れ て い 
る OS CP/M や に つい て 、 る その 概念 、 能 力 な ど シ 
ステ ム の も つ 和 魅力 の ひと つ ひ と つ を 豊富 な 実例 
CP/M@ 


や イラ スト を 使っ て 解き あか し て いく 〈、 
の 入門 書 で す 。 


PC-6001 用 アミ ュー ズ メ ント ・ パ ッ ケ ー ジ 。 プロ グラ ムカ 
モッ ト と 詳し い マ ニュ アル に 、PC-6001 の 美しい グラ フィ ッ 
クス と サウ ンド を 生か し た ゲー ム を 満載 。 ご 家 旅 全員 で 


楽し ゅ ゆる ゲー ム ・ ソ フト で す 。 定価 各 2 .800 円 (〒300) 


(既刊 AX1 一 AX6) 


※CP/M は 、 デ ジタル リサ ー チ 杜 の 登録 商標 で す 。※XENIX は マイ クロ ソフ ト 社 の 登録 商標 で す 。 


( ア スキ 出版 〒150 東 京都 渋谷 区 神宮 前 5-2-2 TEL. 03-407-49I0⑯ 郵便 振替 東 ・7-57496 
な お 、 お 求め は お 近く の 書店 ・ マ イコ ン シ ョ ッ プ に て 、 注 文 番号 を 明確 に し て お 申し 込み くだ さい 


BASIC COMPUTER GAMES 


日 本 語 版 DAVID H.AHL 細 ASCII 出 版 訳 

マイ コン ・ ゲ ー ム の 古典 か 6 名 作 ま で 70 編 を 、 
全 プ ログ ラム リス ト と 実行 例 と 共に この 一 冊 に 
凝縮 。 プ ログ ラム は すべ て BASIC で 記述 。 き 
ら に APPLE, RS-1, PET な ど を 例 に 固有 の 
BASIC へ の 移植 方 法 を 解説 し て いま す 。 


MOHE BASIC COMPUTER GAMES 


日 本 語 版 DAVID HIAHL 編 ASCII 出 版 訳 
「BASIC COMPUTER GAMES」 の 第 2 
弾 。 標 準 BASIC に よる 70 編 も の 楽し い ゲ ー ム を 
収録 。 ま た 、Level-3.IF-800.TRS-II,MZ.-80, 
PC-8001 な ど へ の 対応 も 解説 し て あり 、 プログ 
ラミ ング ・ テ クニ ッ ク の 教材 と し て も 最適 で す 。 


wa リリ ーー 
HC-20 ハン ヘル ドコ ンピュータ プロ グラ ム 集 VOl] 
話題 の ハン ド ヘ ルド ・ コ ンピュータ HC-20 の た め の プ ログ ラム 集 。 ユ ー テ ィ リ テバ 、 
ビジ ネス 、 数 学 計算 、 科 学 技術 計算 な ど 、 す ぐに 役立つ プロ グラ ム 50 本 を 詳し 
い 解 説 EE も に 掲載 。 を の 他 HC-20 の すぐ れ た 機能 と 特徴 も 生か し た プリ ログ" ラミ 
ング 方 法 、 先 進 の す オペ レー ティ ング ・ シ ステ ム XENIX TV の 接続 例 等 、 単 に 実 
用 的 な ゲロ グラ ム ・ リ スト 集 と し て で は な く 、 ハン ド ヘ ルド ・ コ ンピュータ の ハン ド 
定価 2.800 円 (〒300) 


ブッ ク と し て も 充分 活用 で きま す 。 


テー フ プ *・ ア スキ ー は 、 月 刊 ア スキ ー に 掲載 
きれ た プロ グラ ム を カセ モット テー プ " に 収め 、 
詳し い マ ニュ アル と 共に パッ ケー ジ 化 し # 
も の で す 。 買 っ た その 日 か ら ア デス キー が 厳 


選 し た プロ グラ ム が 走り ます 。 (既刊 27 巻 ) 定価 3.000 円 一 6,000 円 


SE 


磁 式 メデ は 


Scotch 


] 人 LLL II 人 a 本 LLLTI | 1 
還 林 本 量 し 」 
還 困 下 可 可 
関 ] 日 語 呈 
- 間 - im ョ 
LILI II LILL TI | | | 上 1 
0E1、 コ ンピュータ は この ふた つの デジ タル 信号 9 り も 精度 、 耐 久 性 に も と ず 〈 信 頼 性 が 重要 視 S れ / 
だ け で 、 あ ら ゆ る 言葉 を 話し 、 考 え 、 動 いて いま す 。 て いま す 。 ス コッ チ ・ デ イス ケッ ト は 、 大 型 コ ン ピ ュ ー | ] 


ディ スケ ッ ト は 、 そ の 信号 を 記録 する 、 い わ ば コン ピタ 用 の 磁気 記録 媒体 コン ピュ ー タ テー プ や デ 
ュー タ の ノー ト と で も いう べき 円 盤 状 の 磁気 記録 イス クタ パッ ク を は じ め 、 デ ー タ カー トリ ッ ジ な ど ま で (W) ( 〇 ) 
Affeew9e わ も ず カ 直径 8 イン チ の 中 に 1.212.416 。 磁気 記録 媒体 を 総合 的 に 開発 し て いる 、 高い | 

バイ ト 、 直径 5.254 位 雇 の 中 に 655.360 バ イ 條 と 技術 で 生産 きれ て いま す 。 信頼 性 で 選ぶ な ら 、 


| I I 
『 
記録 する も の も あり 、 な に よ ディ スケ ッ ト は スコ ッ チ で す 。 スコ ッ チ テイ 。 リ 
| ii 層 
本 この 


いう 膨大 な 量 の 信 舌 


<G: 住友 スリ ー エ ム 株 式 会 社 3M まま 
コン ピュ ー タ ・ サ プラ イ 営 業 部 名 古屋 支 / 
本 社 158 東京 都 世田谷 区 玉川 台 2-33-1 人 (03)709-8526 大阪 支 


の 4 ブフ ーー フン ビッ あの ーー ジグ 


電気 ・ 電 子 機器 
と 
* こ OO 


ロ 
FT] 


乾電池 、 マ イク ロ 電 : 池 、 オ 
タル 和製 


ん 7 


レイ ルン 4 


IlgxB. 


技術 と 信頼 で 応え る マク モル 


刀 


jm こ ス 


要 寄 や 守 や Q 間 JAKK 宣 や ル n う N 
Ps 亜 28296oy 間宮 計 湿り パロ 
国昭 民 瑞光 め 世 Po や? 衣 K 記 組 選 療 
千 記 ペー ドー へ や S467 NHAO 一 人 TK 
各 咽 つい <@ 幸 ぐ 旭 誠 記 脱 KANNSN 
Nu 一 NTKAN26 0S 公 の せり 半 調 
G 間 回 忌 ? っ ぶ を HAD りー ぶ G 午 凡 


祥 紀 符 つ つい JSBv 條 国電 謀 つ いら 
36Y NIRD 一 人 KN いと ン ら SN 一 下 
ーー ツル や ミ 3 所 8 ぐ HO 一 和 K ペ 一 一 公 
りつ 聞 補 つく 2 天守 る 再 : く " つ 全 
” 型 組 xwhKー め と 半生 局 つ っ:B 庫 % 憶 


て 中 yt 振っ 志 拓 直井 時 つい と 


TTY で で 


さ ヽ ささ 
アテ の ささ ささ や SS 


ペペ 
プン アン メメ ブナ ナナ: 


SS ここ ュ 週 <@ 閑 全 の 9 IN ロタ 一 


企業 の 目 が 、 マク セル を 


TK へ 6 セ 和 
や ミ 」JRS で 
で 現 で で 


っ @ 押 元 " 下 
GS へ KK 


| 還 
邊 。 
や 違っ し 自 散 


毅 時 陣 串 鹿 揚 ste 
PA や SNGh ツ ーNRrS 


お 史 区 


有 


日 立 マク セル 株 式 会 社 営業 本 部 / 東 


MP-85 を 教材 と し だ 通信 講座 が あり ます 。 

還 マ イコ ン 自 作 と 活用 通信 講座 

@ わ りや すご 、 体 系 的 で 高度 な 技術 が 得 ら れる よう に テキ ス 
ト が 構成 され て いま す 。 

@ こ の テキ スト は 実際 の マイ コン キッ ト (MP-85 を 組立 て な が 
ら ハ ー ド ガ ら ソフ ト ま で を 学習 し て いき ます 。 


弄 マ イコ ンプ ログ ラム 通信 講座 
@ ソ フト に ガ ら マイ コン の 学習 を 始め た い 方 の 講座 
@ こ の テキ スト は 、 マ イコ ン MP-85 を 使い な が ら 、 豊 富 な 例題 
に より ソフ ト ガ が ら ハ ー ド まで を 学習 で きる 
マイ コン 制御 技術 学習 ボー ド 1/ 〇 O BOARD 
I/O ボ ー ド は マイ コン と 接続 し て 、 セ ン サ 技術 や イン タフ ェ ー 
ス 技術 を 学習 、 実 験 し て ゆく トレ ー ニ ング ボー ド で す 。 


使用 コン ピュ ー タ : MP-85, TK-85, CRC80,PC-8001, その他 80 系 (Z80 を 含む ) 
完成 品 19.000 円 キッ ト 16.000 円 


7 RAM、ROM を 
フル 実装 し た 
も の で す 。 


田 MP-85 の 特長 

@ 制 御 、 実 験 な ど 小 ・ 中 シス テム の 開発 に 最適 。 

最近 話題 の 学習 用 ロボ ッ ト ニ ムー ブ マ スタ ー 
と も イン タフ ェ ー ス な し に 直接 動か せま す 。 

@ 各 種 イ ンタ フェ ー ス が 揃っ て いま す 。 

@ 完 成品 44,500 円 キッ ト 39,500 円 


ワン ボー ド マ イ コン 
P-Sb 


16K ア セン ブラ ・ エ ディ タ 宮 発売 中 ./ 


@ お 問合せ 、 資 料 請求 は 下記 宛 に ご 連絡 下さ い 。 


月 1 株 式 会 社 ーー mm す 〒 東 京都 中 央 区 日 本 橋 茅 場 町 2- 13- 3 市川 ビル 容 03-661-3366( 代 ) 


SOFTWARE INFORMATION FROM SYSTEM SOFT 
ー ぺ ss 
W Nr 


私 眉 は マン マシ ン の イン ター フェ イス を め さ し ます 。 パソ コン の 新しい 風 は 西 か ら … シ ステ ム ソ フ ト に ご 期待 下さ ( \。 
PC-80OO SIMULATION SERIES 
この ゲー ム は ミニ ・: フ ロッ ピー を 使う 本 格 的 な ユン ピュ ー タ ・ シュ ミン ーション ゲ * 一 ム で す 。 


(KAZUTO RAY) 


環 海 海 デー 
久 
/ 日 


TIHE BATTLE OF THE (ORAL SEA 


デー タ 総 量 は 260K。 ゲ ー ム は BASIC で 書か れ て いま す 。 画面 は 、 カ 
ラー を ふん だ ん に 使っ て お なり 、 又 、 デ ィ ス ク か ら の 高速 転送 に より 、 
すばやい 画面 処理 を 行なっ て いま す 。 

その だ め に 、PC-8031-1W 又は 、PC-8031-2W で し か 作動 し ませ ん 。 
まだ 、 プ ブリ ンタ が あれ ば 、 戦 況 報告 等 が 記録 し し て 残せ る よう に な っ 
て いま す 。 

欠 プ ログ ラム ・ デ ィ ス ク 1 枚 氏 デー タ ・ デ ィ ス ク 2 枚 氏 作 戦 盤 、 駒 、 マ ニュ アル 付 


PC-6001 SOFTWARE 
PC_6001 汎 用 機械 語 モ ー タ 。 巡 評 発売 中 ! 
PHPHNONITOR 生計 


Personal All-Purpose Aiding Monitor 定価 5:OOO 円 
< 機能 と 特徴 > 
1 . N60- BASIC の 1 命令 (MON) で 起動 
2 . 30 数 種 に お よぶ 


予価 14.800 円 


PC-8OOO/8800 SOFTWARE 
パソ コン と キャ ッ チ ボー ル 感 覚 ノ ーー カル クス 。 


Computer Aided List Calculation System 


く 使用 例 > 

@ 事務 計算 

@ 集 計 グ ラフ 作成 

@ 見 積 書 作成 

@ 売り上げ 計 画 表 作 成 
@ 子 算 書 作 成 


カル クス (汎用 デー タ 処 理 簡易 言語 ) 


これ まで の PC-8800、8000 用 ビジ ネス 


@ 機 械 語 の オー トス ター ト が 可能 ソフ ト で は 考え られ な か っ た 機能 と 処 


豊富 な 機能 で 操作 性 抜群 4 、TEN キ ー・HEX キー 仕様 で 機械 語 入 力 が 簡 M W 
3 多 条 な テー プ フ ォ ー マ ッ ト て 他 ほ の コミ ュ WW 理 速 度 を 実現 し た 汎用 デー タ 処 理 簡易 


ニケ ー ト が 可能 。 5. 機械 語 お よび BASIC の チェ ッ ク サ ム 機 能 付 言語 、"CALCS "完成 。 
PC-8001・8801 の モニ タ で SAVE き れ た テー 6. 10 進 ・16 進 変換 関数 HEX$ を 追加 
プ が 使用 可 7 . 各種 情報 の プリ ンタ 出力 可能 


eSEAM-60 で 作成 し た オプ ジェ クト が 使用 可 


PC-60O1 GAME SERIES 
美しい グラ フィ ッ ク と 充実 し た 内 容 の ゲー ム ・ ラ イブ ラリー 


好評 発売 中 / oo 


回 軍 』 コン バッ ト デ ゲー ム |32K…\3.000 り FO シ ョ ッ ト |I16K……\3.000 
@ レー ダー 作戦 ゲー ム 。 @ ビー ム 砲 を 武器 に 地球 の 敵 UFO を 破 減 
ET 還 サル カニ 合戦 116K… ツ \3.000 させ る こと が キミ の 使命 / 


定価 48.000 円 


CALCS は 、 タ テ に 255 項 目 、 ヨ コ に 255 項 目 、 
計 65,025 項 目 を 持つ ワー ク ・ シ ー ト 上 に 、 文 字 
や 数 値 、 式 、 関 数 等 を 入力 し 表 形 式 の デー タ 処 
理 を 対話 形式 で 行なう デー タマ ネー ジメント プ 
ログ ラム で す 。 


カル クス を 起動 する に は MICRONICS が 必要 で す 。 


@ 技術 計算 PC-8000、PC-8800 用 ディ スク オペ ベレ ー テ ィング シス テム 
いじ わる ザル の 投げ る 柿 を 、 カ ニ が 林 の テレ ンジ ポー アル 116 に 3.000 その 他 各種 作 表 ・ 計 算 処理 MICRONICS や Ver.2. 1 定価 46.000 円 
デア 用 0 エー Ag な ・ ご. w 
下 で 受け と め ま す 。 @ ボー ル を 16 個 打っ て 、 縦 か 横 か 、 な な め MICRONICSW は 、 株 式 会 社 マ イク ロリ サー チ ( 東京 ) の 商品 で す 
HI 本 ポポ 一 ヵ ーー]32k…\3.000 に 4 個 壮 べ ば コイ ン が 増え る <CALCS 例 > 3 No の っ UESEn YA 
@ カー ド ゲ ー ム の チャ ン ピ キ オン EE 本 ササ プ マ リン |32K…-\3.000 
上 プラ ッ ク ジ ャ ッ ク ]32K…\3.000 % キミ は 、 パ ビュ ン 艦 隊 の 指揮 Et 7 
@ エース と 絵 札 で 21 の プラ ッ ク ジ ャ ッ ク / ポ クシ ンダ |32K…\3.000 2! | 生 2Eo2at5 間 y40 Au 6 
I 責 マー ジャ ン ゲ ー ム |32K……\3.000 $ コ ンピュータ 頭脳 を 持つ ボク サー と 決 閲 31T?2 | 15.3?81 25.32?| 28,54?| =?、85 る | 18?,302 1 も る も る も る 9 を 
9 は で ティ ング ・ ゲ ー ム 4 + + WI | 
@4 人 いな く て も で きる 1 人 マー ジャ ン の た る 4 の イン ダグ 20 補っ メ 5 192 ナ | 45.S281 5 る <、283| や 5.851|  ? る ,541| 22<、Q つ 31 6 も も や ある も 6 る や も る 6 も も も る 
決定 版 / + | 
決定 版 定価 本 1 3 EK スス メス メメ メメ メメ メメ メメ メ 】 
で さこ > 内 2 ーー ーー 
Rei 選定 回 好評 発売 中 ノ ま 5 oo 7| 145.0491e4etetee 
回 MI 由 般 割 ・ シ ー ソ ツー で 跳び 上 が りな が ら 風 船 を 割る ゲー ム 1 TaL 109 1 も も を を る も も る も も る か る も る る も も 
KW へ > ド オ "四角 ュー ス を 敵 の クル マ を きけ な が ら 得 点 を か せ ぐ ゲー ム 。 12 一 523 
EW ス ター ファ イヤ 星 群 の 中 で 敵 と 交戦 する ゲー ム 。 14 MiN <3 
配合 ロー リン グ ク ラッ シュト …- ヘ ッ ド オン の 8 の 字 コ ー ス 版 。 相 手 の 車 を うま く 避 けつ 8 AE 0: 
つ 、 点 を 消し て ゆく ダイ ナミ ッ ク な ゲー ム 17 caLc 
鞭 本 パッ ク メー ン |… 宇 宙 人 に 食べ られ な いよ うに 逃げ て 得点 を か せ ぐ ゲー ム ル L 6 に 


AM あ C マイ コ ョ ッ プ 


全国 有名 マイ コン ショ ッ プ で 販売 中 


USER'S POST 


商品 の 詳し い 資 料 請求 、 お 問い 合わ せ ご 要望 な ど 
いま し た ら 、 官 製 ハ ガキ に 資料 請求 券 を 貼り 、 住 所 、 氏 名 、 
年 令 、 職 業 を 明記 の うえ ぇ 、 弊 社 出版 部 まで お 寄せ くだ さい 


SwSTETY SCFT 


コン ビュー ター シ ス テム & パ プリ ケー ショ ン 
株 式 会 社 シス テム ソフ ト 福 岡 
〒810 福岡 市 中 央 区 天神 2 丁目 14-8 福岡 天神 セン ター ビル BI 
PHONE :092-714-6254 ご 注文 ・ お 問合せ 092-714-5977 


お 申し 込み 方 法 / 現 金 書留 、 郵 便 為 替 ま た は 銀行 振込 
( 百 十 四 銀行 福岡 支店 874) で シス テム ソフ ト 福 岡 
出版 部 まで お 申し 込み くだ さい 。 送料 は カモ セッ ト \\250. 
ディ スケ ッ ト \200. 書 籍 \300. ハ ー ド \300 で す 。 


よさ が 庄 共 


吉 556 大 阪 市 浪速 区 日 本 橋 5 丁目 12 番 9 号 日 本 橋 会 館 2F 
会 (06) 644-4666 営業 時 間 AM10:00 一 PM7:00 水曜 日 定休 


(③ 共 葉 悪 子 庭 薬 ( 林 ) 


"使う より な れろ る "の 真意 


肩肘 は っ て ヾ マイ コン を 征服 し て や る ” な ん て 考え ず に 、 ま ず 、 マ イコ ン と いか に うま く や っ て 行く か 、 か ら 始 


め て みて は いか が で すか 。 マ イコ ン は 有 能 な 秘書 で あり 、 博 学 な 友人 。 付 き 合い 方 に よっ て いろ ん な 面 を 


持ち 備 を て いる も の で す 。 


まず マイ コン に 何 を や ら せ る の か 、 目 的 意識 を 持つ 事 が 先決 。 い き な り イニ シア チ ブ を 揚 ろ うと 、 征 服 欲 


を 出す と マイ コン に きら われ か ね ませ ん 。 目 的 に 応じ た つき 合い を 深め て 行け ず 、 マ イコ ン の 全体 像 も 主 


ず と 見 えて きま す 。 


コム スポ ッ ト 共 立 は 、 い か に うま く マ イコ ン と つき 合 うか の アド バイ ス か ら 、 より 友 交 関係 を 深め た つき 合 


い 方 まで 、 巾 広く 奥深 く 、 ご 要望 に 応じ お 伝え し て いま す 。 


で い い @ ビ ジネス 用 シス テム か ら ホ ビー 用 まで 、 コ ム ス ポッ ト の 充実 し 
吉 コム スポ ッ ト 共 立 の 推 表 と だ ト 画 た サー ビス と サポ ー ト で @ ロ ー ン リー ス 販 売 及 び 各 種 ク 
@ 高級 言語 PASCAL /M, PL /!-80. BASIC レジ ッ ト カ ー ド (JCB 、VISA etc.) も 取扱 つて お り ま す 。 @ マ 
-80.BASIC COMPILER.FORTAN-80.C CO イコ ン セ ミナ ー を 常設 し て いま す 。- 一 ーーーーーーーーー 
MPILER.FORTH/SL 5.PLMX.COBOL-80 お 問合せ ・ お 申込 は 、 谷 (06)644-6444 へ 。 


ご RhPH 


DRAMVER 


GRAPH シ リー ズ | 簡易 言語 シリ ー ズ 
GR A PSS[ 午 只 涼 ] ロム ロム AIMI sg ロー バ < づ 
(PC-8800) 3 (PC-8800・PC-8000・FM8) 
GRAEH/7 (# ログ ラ 才 ] | =/。 キ ギー ア < す ん | K1 yr 9 
(PC-8800・FM8 ) 
ARAIMI K2 謗 
(PC-8800・FM8) 
呈 1 品 ロ 
ビジ ネス ・ ソ フト シリ ー ズ 
SSG( ぐ 2000 ほほ 計 基 
(PC-8000・FM8) 


漢 字 人 名 海 ( 休 結 包 


(PC-8800・PC-8000・FM8) 
杜 報 INFO (Pc-8800・FM8) 
上 売 GILVER (pc-8800・Fve) 


ト ま 4 GOLD (PC-8800・FM8) 
骨 務 紳 の 人 | (Pc-8800・FM8) 


導き (PC-8800・FM8) 


タタ 1RIA-MATE (Pc-8s0o) 
< ラジ オイ ム ノア ッ セ イ ・ プ ログ ラム > 


BUSINS 
SOFT 


シス テム 販売 か ら ソ フト 開発 、 
オペ レー ショ ン 教 育ま で 


$ り 画 電 祉 


WC マイ コン ショ ッ プ : シス テム イン 高電社 
〒546 大 阪 市 東住吉 区 杭 全 7ー10-15 TEL(06) 719-1131 代 
店 : シス テム イン 高電社 


大 阪 駅 前 
〒530 大 阪 市 北 区 梅田 1-11-4 大 阪 駅 前 第 4 ピル 6F TEL(06) 341-3371 代 


ワー ド プ ロ セ ッ サ ー 


ル MMORD 
PROCESSOR 


マイ レタ ー (時) 記 
(PC-8800・ FM8 ) 

英文 ワー ド プロ セッ サー [リー ド 9000) 
(PC-8800・PC-8000・FM8) 
多 ワ ー ド プロ セッ サー 


(PC-8000) 


に 
プロ セッ サー 


(> ン 欠 4300) 


その 他 の プロ グラ ム 
白地 図 (Pc-8s0o) 
アラ ビア ン ナ イト 【 千 一 夜 物語 ) 


(PC-8800) 


の o 


ご 吉 許 副 


ノ 
レン 


導 
ヽ 


Nw 
レコ 
. 


ジー 圭一 HH で て 
N 


>H9tAE dt 相 ど 
の デ テ ヽ NIS で 十 


高電社 は ソフ ト 開 発 の オー ソリ ティ 。 簡易 
言語 "パラ ムシ リー ズ " で ワー ド プ ロ セ ッ サ 
ー ソ フト “マイレ ター" で 、 そ の オリ ジ ナ リ 
ティ を フル に 発揮 し まし た 。 

また 、 簡 易 言 語 で は じ め て 漢字 仕様 を 
登場 させ た の も 高電社 で す 
これ か ら も 、 パ ソコ ン を より アク ティ ブ に 
ご 活用 いた だ く た め に 、 完 成 度 の 高い 
各種 ソフ クト を ビジ ネス ・ フ ィ ー ル ド を 中 心 に 
開発 し て いき ます 。 


連続 ・ 自 動 読み 取り 式 
フード サード グ 


M-300 


同時 発売 


マー ク カ ー ド リー ダ M-300 
標準 価格 
y 228, OOO 


に ょ り マミ ヤ 機 器 販 売 株 式 会 社 
ンコ に で を o パ ウレ ギロロ 東京 都 訪 京 区 本 3-40-11( 和 柏 雇 ビル ) 


TEL oni の ssal 
OR シェ ー ク 方 式 ) 切換 に より どちら も 使用 可能 。 
マー ク カ ー ド リー ダ M-300 の 特長 | 2 : 光電 反射 栓 方 式 


マー ク カ ー ド リー ダ M-300 を 
活用 し た アプ リケーション ン フ ト 


念 低 価格 と コス トバ パフ ォ ー マ ンス の 優秀 性 異常 検出 機構 : 自 己 診 断 機構 Pl の K 2 @ アン ケー ト 集 計 プ ログ ラム (PO-8001、PO-8801 
象 ほ と ん どの パン コン に 接続 可能 。 JAM エ ラー、 カ ー ド セッ ト エ ラー、 デ ー タ エラ ー。 


各 \25,000) 


人 業界 で 初め て の カー ドリ ー ダ @ 成績 処理 プロ グラ ムー 一 近日 発売 
オペ レー ショ ン ン フト 、 ア ン ケ ー ト 


久信 頼 性 の 高い (業務 用 タイ プ ) 久作 業 工 程 コ スト シュ ミレ ーション プロ グラ ム 
集計 の 特長 


ュ ー 一 近日 発売 。 
マー ー ド リー 
人 ダ の 仕様 @ 有 即 、 実 務 に 利用 で きる 。 FM- 8, パン ビア 用 ソフ ト 近 日 発売 


中 ッ ー ド 76-OWee0BM フ ォ ー マ ッ ト に イジ @ マ ー ク カー ドッ ォ ー マ ッ テ イン グ の 則 で 8「 
走向 速度 : !50 枚 分 連続 。 @ 単 純 集計 、 ク ロス 集計 、 多 次 元 集計 が キー 操作 ニーーーーーー ニ ーーーーーーーーーー 
読み 取り カー ド : バ ンチ カー ド 、 マ ー ク カー ド 、 で 簡単 に 行え る 。 相武 白 貼 池袋 店 
と ちら も 使用 可能 ( タイ ミン グマ ー ク 付 カ ー ド ) ⑱ アンケ ー ト 設問 は 最大 80 問 、 各 設問 の 選択 数 9 以内 。 7 寅 コン ピュ ー ク フラ ア 


イン ター フェ ー ス :RS-232C、 パ バラ レル (ハン ド 


@ 見 や すい 集計 結果 の 作 表 が で きる 。 TEL03(981)0111 内 線 2691 担当 ・ 長 谷川 、 松 井 


世紀 を 視野 に 、 豊 か な 社会 の 勤 曽 に 挑む 
電 研 ソフ トウ ェ エア " 


シス テム 開発 業務 の 内 容 / 

く < ベー シッ ク ・ ソ フト ウェ ア の 開発 > ⑱ 各 種 事務 管理 シス テム 
二 衝 ウー ディ ング トシ ジス の る 信 流 通 サ ービス 用 ソフ トウ ェ ア 
信 通 信 制 御 プ ログ ラム 人 @ 辻 子 交換 シス テム 
本 @ 行 贅 情報 シス テム 


データ ・ ベ ー ス システム 信 基 療 情報 シス テム 
@ 各 種 ユ ー テ ィ イリ ティ ・ プ ログ ラム 念 病 院 シ ステ ム 
く < アフ リケーション ・ ソ フト ウェ ア の 開発 > @CAD/CAM シ ステ ム 
@ バン キル グ ・ シ ステ ム < 各種 ツ ソフトウェア ・ ブ ロダ クツ の 開発 > 


電 研 ソフ トウ ェ ア 株 式 会 社 


本 社 東京 都 港 区 受 5-13-14 アネックス 三田 ビル TEL(03)455-6008〈 代 表 ) 
横浜 支社 神奈 川 県 横浜 市 西区 南幸 2-7-10 松山 ビル TE し CO45)312-2102( 代 表 ) 
福岡 支社 福岡 市 博多 区 博多 駅 東 2-4-16 福泉 第 一 ビル TEL〈O92)472-0351( 代 表 ) 


ニン シラ クイ 人 の お 手 伝 も 


7O7AL SUPPL/ER 〇 OF ん ICAO て OFU7ER COO の pS. 


PG-8000 ラ イト ペ シ 
ーーーーー\18.000 


人 / 


ディ スケ ッ ド ファ イル PC=8001 話 2 私 テイ ズ ケ ッ ツ ト 保 護 リ ング セッ ト 
… の 枚 ・ 平 250 3 声 基本 半 K000 に ee \2.400 SN 
- 人 4 枚 300 6 声 追 加 半 6800 ※ ぶ その 他 マ イコ ン 用 品 全般 。 
納 須 金 首 送 料 を 確認 下さ い 。 角 現金 書 宝 で 送信 下 ざ ぎ い : 話 代 送 し ます 画 1 万 円 以下 の 御 注文 は 、 送 付 手 数 料 1.000 円 追加 し て 下さ い 。 


@ 営 業 本 部 /〒617 5 5 開田 2 目 13-13 TEL (075) 939-5231 (代表 ) FAX (075) 939-4163 GII・G 四 
13 KAIDEN 2-CHOME N OKAKY0-SHI KYOTO 617 JAPAN 


(GOOD @ 大 阪 営業 所 / 〒556 大 阪 市 浪速 区 日本橋 5 丁 目 11 -14 妨 52 ビ ル 302 TEL (06)644-3136 (代表 ) FAX (06)644-3138G II 


dcom @ 東京 営業 所 / 〒103 東京 都 中 央 区 日 本 橋 小 舟町 9-1 TEL (03)664-6714 FAX (03)639-8840G HG 
アド コム 電子 株 式 会 社 @U り U.S. A >) ENTERPRISE DRV PLACERVILLE CA_. 95667 U.S.A. TEL (916) 626-3351 


キャ リー ラボ 


郁 々 , 誠 作 が カー ムク グラ ン 人 5 


キヤ リー ラボ は 、 ご ご 森 の 都 熊 本 る 
愛さ きれ て 1 年 、 公 国 津々 浦 々 を 飛び 


ニュ ケー ショ ン の 発達 で 大 都市 賠 と 地方 都市 と この 橘 差 ゲ < な のり の つつ ( 7 た 7 ョ カ 
ある 現在 、 キ ヤリ ー は これ か ら も 熊本 を 本 拠 地 と し て 、 皆 さま の ニー @ 


ズ ビ あ の ぐり の 本 コ 刀 を 


アロ ) と 2 ] を 開発 お 。 50 +。 州 キ キャ リー ラボ  〒862 熊本 市 保田 窪 本 町 1004-2 
お 気軽 に お 立ち 寄り 下さ い 。 三 州 ハ イツ ビル 1F TEL(0963)82-8527 


GENW | チェ リー ソフト は 
OFYO あな た の 能力 開発 の パー トナ ー で す 。 


皆様 、 今 日 は BASIC を 楽し 勉強 出来 まし た か 。 言 葉 を 勉強 する の で すか ら 、 と に か く 使っ て 見 る こと が 大 切 で す 。 ラ パー ソ 
人生 了 人 3M に S10 で すか ら 、 和 皆様 の 勉強 の 手助け が 出来 な い に は ず 
は あり ませ ん 。 西日本 マイ コン モン ター ・ 能力 開発 研究 会 が ぉ 送り する 自己 啓発 能力 開発 ソフ ト は 皆様 の 能力 向上 に お 
役 に 立ち ます 。 Ep 歩 前 進 す る 貴方 の パー トナ ー で す 。 で ぜひ 、 御 活用 下さ る い 。 


チェ リー ソフ ト の 御 案 内 


〔 暗 記 訓 練 ) は 大 事 な 要 件 の 記憶 や 整理 に 役立ち ます 。 


時 皆様 が 質問 Q が 出 て か ら 6 数秒 後 に 答 A が 出 ます 。 丁度 質問 を 表 に 書き 、 答 を 裏 に 書 
ブレ 
人 | 和 カ し きす 」 いた カー ド を 順番 通り 見 だ り 、 不 規則 に 見 た りす る の は じ 効 果 が あり ます 。 

A ニ シ ニ ホ ン 時 を 自 | 私 共 が 強調 し だ い の は この 質問 と 答 が 実は デー タ と し て 保存 出来 る こと で す 。 


マイ コン セン ター ーーーー 教育 デー タ を 自 か ら 作る こ 避 に な り ま す 。 ラ パー ソナ ル デ ー タ ベー ス の 作成 で す 。 


プロ グラ ム は BASIC で 書か れ て お り LIS 生 も 出 ま す の で 、 参考 に も な り ま す 。 ご 自分 で BASIC の 補助 テキ ス ト を 
パソ コン を 習い な が ら ッ \ ソ コン に 手助け きせ る の も 楽し いで は あり ませ ん か *。 生ま 


[PASSAGE]STREET)(AyENUE] は パー ソナ ル デ ー タ 時 代 、 能 力 開発 時 代 に マッ チ 
し た 皆様 の 簡易 ソフ ト で 能力 開発 の 為 の 開か れ た デー タベース で 


デー タ は 皆様 の も あの で す 。 メ パー ソナ ル 時 代 個 性 花開く 時 代 に 小 き な デー タ が 集 っ て 大 き な 力 と な り ま す 。 だ と え 小 さき な テー 
プペ ー ス の 機械 で あっ て も 皆様 の デー タ を 集め る こと が 出来 ます 。 PASSAGE、STREET は 使い や すき 、 分 りや する を 
追求 し た BASIC に よる 簡易 ソフ ト で す 。AVENUE は 皆様 の デー タ を 、 よ り 活 用 する た め の パ ッ ケ ー ジ ソフ ト で す 。 
各種 能力 開発 ソフ トリ ンク し て デー タベース を 作成 し ほす 。 LIST も 取れ ます の で 、 プ ログ ラム の 勉 強 に も な り ま す 。 皆 様 
が 小 き な デー タ を 持ち ょ り 、 お 互 に 連帯 する 新しい 時 代 の 開か れ だ デー タベース で す 。 

デー タ の 作成 、 計 算 、 集 計 、 検 索 、 変 換 、 並 べ 替 等 、 実 務 ツ フト の モデ ル と も な り ま す 。 

暗記 訓練 *M<-80B ePC-8001 *\ 8.800 STREET-A 


@MZ-2000 


ePC-8001 @MBC-2000 
ePC-3200S eif-800 \39。, 
(TAPE) | svz- 80k/C * そ の 他 機 種 も 開発 中 | ( DI ら K ) | e 日 立 レベ ル 3 PC-8801 


PASSAGE | *PC-8801 eMZ-80B スー パー | *Mz-80B \ 00 
TE 
STREET-K | 。 ェ テッ ン oc-20 

(DISK) | 強力 漢字 ソフ ト 
AVENUE | *PC-8001 @PC-8801 


(DISK) @ 日 立 レ ベル 3(MK I ) 


eMZ-80B、K/C 
ePC-8001 \ 4.000 


各局 を 今 再現 、 ア ゲ 石 コウ 等 ルー ル 本 格 的 


@FM-80 その 他 開 発 中 

(全国 マイ コン 店 、 書 店 で どう ぞ ) 
小冊子 レ ゃ ソコ ン 時 代 を 考え る 、 能 力 の 流通 、 個 性 花開く 時 代 〕 \ 500 〔 送 料 共 〕 
[正しい パソ コン の 買い 方 〕 \ 500【〔 送 料 共 ]〕 


5 通販 現金 書留 : 自己 啓発 能力 開発 ハー ド ・ ソ フト を 推進 する 

: 百 十 四 銀行 : 
| 生還 = 后 : 9 西日本 ウマ ココ セ っ ヨー で 能力 開発 研 至 寺 

: 0187140 : 高松 市 多賀 町 2 一 8 一 22 会 (0878)33ー8673 高松 市 松 福 町 2 一 | 一 9 佐 (0878)21 一 1O35 


| シン プル 大 伝 パン ラン の 新しい 度 児 


NEC マ イコ ン シ ョ ッ プ " ハー ド 避 ソン フト NDK は 、 

水 年 通信 業界 で 養 わ れ た 通信 端末 機器 技術 を 生か し 、 
企業 内 OA 化 の お 手伝い すべ く この 度 新しく 、 

パー ソナ ルコ ンピュータ 部 門 を も 手掛け る こと と な り ま し た 。 
貴方 の すべ で ぐ そ を ば 、 お 忙し い ビ ジネス マン の 方 に 

便利 な 本 町 ヘ シ ョ ッ プ を 設置 し 、 お いで を お 待ち し て いま す , 
電子 交換 機 、 ボ タン 電話 機 は も ちろ ん 

ファ クシ ミリ 、 ワ ー ド プロ セッ サー、 オ フィ スコ ンピュータ 等 、 


人 TS te OA 商 品 に お ける 豊富 な 経験 と 知識 の 8 と に 、 
OSNY |_itt で 商 還 陸 WMOWWMMSGG 


ーーーーーーーーーーーー 一 貴方 の 良き パー トナ ー と な れる こと を 確信 し て なり ます 


PETHIIHL PHiTIPUTE ロ 


営業 時 間 / A.M10:00 て PM7:00 

(日 曜 、 祝 祭日 は 休ま せ て 戴き ます 。) 

マイ コン スク ー ル / 入門 ・ 初 級 ・ 中 級 コ ー ス 

(日 程 等 に つき まし て は 、 当 ショ ッ プ 迄 お 問い 合わ せ 下 さい 。) 


he マイ コン ショ ッ プ 
ハー ド & ソ フト NDK 


〒550 人 ( 兵 又 ビル 1F) 
会 (06) 543 一 O808 (代表) | | 筋 


オー ター メイ ト 受 


け 承 り ま あぶ 」 


- 口 に 企業 も つて も 十 社 十 色 、 
業務 内 容 か ら 規 模 まで 内 容 は 様々 。 
既成 ソフ ト で つま づく (の は ここ の ころ で 、 
企業 に 応じ た ソフ ト と な れ ば 、 や は り オ ー ダ ー メ イド に と ど め を き し ま す 。 
エイ ド ・ シ ステ ムズ ・ サ ービス は トー タル に 企業 プラ ン に 対応 。 
オー ダー メイ ドン ソフ ト 、 
アプ リケーション 開発 は な 手 の も の で す 。 


ULTIIIIU ML ナル エ エエ スス イエ マイ マン 2 ウパ TXTYI 
e 販売 管理 e 顧客 管理 e 仕 入 管理 @ 在庫 管理 給与 計算 
e 財務 会 計 e 売 紅 金 管理 買 抽 金 管理 @ 経営 計画 品質 管理 


IA 回 エイ ビ ミ ヨロ スギ . ズ サー ビズ 


541 大 阪 市 東 区 南 本 町 3 丁目 15( 竹 本 ビル 5F ) 容 (06)245 一 5145( 代 ) 


e 
ee 


77707 77977 


確か めのう え 、 


9 Js 徹 直 な 機 筐 で デモ ンス トレ ーション 。 
あこ 自身 の 手 で 直接 お 試し に な り 、 充分 納得 し た う を で ご 購入 いた だ け ま す 。 


Super | 00 3 M ( ュ タ ンダ ー ド …… ド ooeermri Y58.000 
PC-8000,FM-8 用 

Amp-80PC-8000、FM-8, MZ-80 用 (カセット テー フ ) 

IRIS80PG-8000 用 

MDB11PC-8000,FM-8 用 … その 他 CP/M 関 係 ソフ ト 

PC-PALPC-8000 用 H 日 本 語 ワ ー ド プロ セッ サ FM-85 用 Y 148.000 
PARAM-K1 : 漢 字 が 使え る 簡易 言語 ……… ぐ で Y49、000 
マイ コン 独歩 : BASIC 独 習 プ ログ ラム 

UCSD Pascal シス テ 給与 計算 パッ ケー ジ PC-8000 用 Y250.000 

FLEX FM-8 用 1 財務 会 計 シ ステ ム 3 牧 Y 80,000 一 Y 250.000 


※CP/M, CPM-86, MP "M は Digital Research 社 
FLEX は TSC 社 、UCSD Pascal は カリ フォ ルニア 
大 学 理事 会 の 登録 商標 で す 


営業 時 間 
平日 AMI0:00 一 PM7:00 


土曜 AMIO:00 一 PM5:00 
定休 日 日 曜 、 祝 ・ 祭 日 


イン フ ズ ペパーズ - ソ ファ / 


〒150 東京 都 渋谷 区 南平 台 町 1 -11 ホテ ルレ サンルート 1F PHONE :03-461 -3671 


ホ ポテ ル サ ン シル ー ト 洲 谷 ビル 1F 


で ぷ 了 あの マイ コン リー タ 、 


日 本 マイ コン フリ レプ 


royenraNONGS※ 
AUAN4 半 の 7 


ser9tt0KE 堪 


記 * 


中 本 マイ コン 株式 会 社 
日 本 マイ コン 販売 叉 を せ 


06(374)1717 改 


本 マイ コン 学院 
〒530 大 阪 市 北 区 中 崎 西 1 丁目 4 番 22 号 (第 入 新 興 ビ ル ) 


cryte0KotNN 


2 


日 本 マイ コン プルー アプ 


OOT?96r 9 


り 


ぐ で > 


グ と 


NNN 


ピノ 


rf Y 


ノ 


「 マ イコ ン 入 門 」 の 読者 の 方 達 は 、 仕 事 な ど に マイ コン を 役立て た い と 考 ぇ る 積極 人 間 ば 


か り の は ず で す 。 で も 、 る その 一 歩 進 ん だ 人 達 に ほっ て き ぇ 、 
分 が 多い も の で す 。 ハ ー ド 、 ソ フト 、 言 語 、 周 辺 機器 、 
問題 の タネ は 尽き ませ ん 。 そこで 、 
だ 言い 方 を 許し て いた だ ける 
だ た っ ぷり の ノウ ハウ で 、 


# る な ら 、 私 た ち は マ イコ ン の 「 生 き 字 引 」 
あな た の どん な 問 に も 


日 本 マイ コン グル ー プ ' に お 任せ 下さ きい 
つま り 、 
きっ と 満足 で きる 解答 を お 出し し ます 。 


マイ コン は まだ まだ 未知 の 部 
イン ター フェ ー ス 、 


寺 参 に Sv と 
思い 上 が っ 
それ は ほど 自信 


コン ピュ ー タ ー を 知ら な いあ な た て 
も 「 バ パソ ピア ン ,」 の 会 員 に な れ ま す 。 


@ PERSONAL _ COMPUTER 


DAS ぐ PA ハ 


ょ に て = 凛 の た め に 


/ /%%90000700 り りり 
有用 有用 


全員 
ePA7010 T-BASIC Et 「 
ePA7150 グリ ー ン ディ スプ レイ 剛 | 


只 eeeeeeeeo@ 放 341-3422 


国鉄 大 阪 駅 1 孤 人 
! 守 1 Le ーーーーー- e 営業 時 間 A M 10 :00 一 18:00 ま で ( 祝 ・ 日 休 )ーーーーーーー ,。 レ ビレ テ の カタ ログ ・ バ パン ピ 
m、 0 レー ネ 時 で 本 


e 大 阪 駅 前 第 ビル 8 階 


ガリ ルコ ム 


〒530 大 阪 市 北 区 梅田 1 一 1 一 3ー9800 


則 、 走 / 「 RDC の ャ 小 価格 


人 和仁 の PC-8807 を 
多久 そ > 妙 序 で 。 


NEC 
PC-8801 シ リー ズ 
\286.899 


PC8801 
@ グ リー ン デ テディ スプ レイ JPG8851I |4 カ ラー デイ スプ レイ 4M-101O 
く お 支 払い 例 > 〈 お 支払 い 例 > 
9.850 円 X1 回 10.100 円 X1 回 
ま 月 … い の e の 9.300 円 X23 回 7.500 円 X29 回 
ボー ナス 月 加算 … 20.000 円 X 4 回 ボー ナス 月 加算 20.000 円 X5 回 


RBC 実 用 セッ ト クウ 
PC-8000 シ リー ズ 


入 / 棄 PC-6007 を 。 
Ti ーー PC800 NEC PC-6000 シ リー ズ 


@⑯ カ ラー ディス プレ ライ ni|4M-I016 | @ グ リー シティ スプ レイ ・DDM-|20C 
@ カ ラー 用 ケー ガル PC809! < お 支払 い 例 > Set 1. \T26.GG8 
< お 支払 い 例 > M 人 本体 …… ロ ーー ドド ドー ドー PO6001 介 ROM&RAM カ ー ト リッ ジー……… 

12,200 円 x (回 7.000 円 17 グリ ー ン テディ スプ レイ -…:PC6041 PC6006 

12,200 円 ※ 中 回 ボー ナス 月 加算 :…30,. 000 円 X3 回 く お 支 払い 例 > 
ボー ナス 月 加算 mr50』000 円 2 回 初回 ・3.950 円 1 4.125 円 X1 回 
X23E 3.100 円 X23 回 
…10.000 円 X4 ボー ナス 月 加算 … 10.000 円 X4 


の 電話 で の お 問い 合せ は 日 守 日 が 確実 に 前 進 の 日 々 と な る マイ コン 教室 


03-989-1094ー5 秋山 、 佐 々 木 まで ID 
受付 時 間 午前 9 時 30 分 一 午後 6 時 kw コ RBC の パソ コン か 


。 こ ッ の 
(日 ・ 奈 は 休み ) な ビジ ネス ス フ ー ル <$ 半 ーー 
20 歳 未満 、 学 生 の 方 は 、 保 護 者 の 名 前 て お ! が 0 それ ぞ れ の 企業 の ニー ズ に あわ せ た コ ー ス 設定 の 
し 込み 下さ きい いい い ご 要望 に も お 応え し て お り ま す の で 、 お 気軽 に ご 相 
談 く だ さい 。1 人 1 台 30 名 様 ま で 収容 可能 で す 


圏 お 支払 い 方 法 頭 金 ゼロ 、30 回 分 割 まで 
較 配 達 無料 銀 行 振込 は 下記 へ 

第 一 勧業 銀行 池袋 副 都 心 支店 

普通 預金 口座 

RBC ビ ジネス スク ー ー ル 191-1274740 


< 特価 コー ナー の お 知ら せ > 
展示 品 を 特別 価格 で 大 放出 ./ 詳し く は 、 
ご 来店 の うえ 、 現 品 を ご 確認 下さ い 。 


O-A の ーーー 一 | RHL | 式 # な リフ レッ シン グ ビ ジ ネス 


〒170 東京 都 幅 島 区 東池袋 3-3-5 TEL 03(989) 1091⑯⑩ 


テグ ニック と / ク 3 等 と の 、 さ み 実 誠 .2 wsgco ブ \ ジ プン の 


本 体 価格 
\89.800 


わが 家 の パ ピュ ン フロ ッ ピ ー デ ィ スク 接続 可能 
MEC PC-6000 コ リー ス 
〔 家 庭 ・ 学 習 ・ ホ ビー・OA 入 門 に 最適 な パソ コン 〕 
念 音 声 出力 は 三重 和音 (8 オク ター ブ ) 演奏 が 可能 。 


@ 宗 庭 で 楽し め る ジョ イス ティ ッ ク 、 絵 を 入力 で きる デジ タイ 
サ の 接続 が 可能 。 家庭 の テレ ビ に その まま 接続 可能 。 


本 体 価格 
\168.000 


パパ フォーマ ンス パソ ジコ ン 


7 の 9 PC-8000 ヨリ ー ズ ^ 


今 周 辺 機器 ・ ア プリ ケー ショ ン ソ フト が 尊 滞 。 
1MB フロ ッ ピ ー デ イス ク 、1 ドラ イブ ミニ フロ ッ ピ ー 接 続 可能 。 


本 体 価格 
\228,000 


"MM ん 
ーー ーー 
キス パー ト パ ソ コン 


7 29 PC-8800 ヨ リー ズ ^ 


@ メ モリ は 184KB 実 装 し (、 ユ ー ザ ー 領 域 64KB と 豊富 


介 ク グラ フィ ッ ク は 最大 640 x400 ド > 度 な 画像 


信 漢 字 搭 載 に より 日 本 語文 章 が 作成 可能 。 

供 消 型 85 イ ンチ (1MB) フロ ッ ピ ー デ イス ク を 接続 可能 。 

機能 重視 の パソ コン デス ク . 
フェ イ マス デス ク 


アジ ャ スタ ー 付 \ 49.500 
キャ スタ ー 付 Y 51.800 


念 電流 操作 が 楽 な リモ ー ト ・ ス イッ チ 付 
5 イン チ 、8 イン チ ・ フ ロッ ピー ティ スク に 氷 
p オプ ショ ン : ペー パー ラッ ク 、 ケ ー プ ブル *・ 物 品 入 れ 


PC-8800 ヨ リー スズ "採用 / 新 鋭 機種 に よる 新鋭 カリ キュ ラム 。 
APC PC ミリ - ス パソ コン ・ ビ ジネス 講座 


(2 日 間 ) 
\25,000 


(2 日 間 ) 
\21,000 


(2 日 間 ) 
\ 24,000 


(2 日 間 ) 
\ 30,000 


(2 日 間 ) 
\30,000 


ビジ ネス マン 対象 の パソ コン 入門 コー ス 。 パ ソコ ン の 機能 、 事例 か 
ら 操作 、BASIC 命 令 の 基本 まで を 学び ます 。 周辺 機 器 も 紹介 。 


ファ イル の 入 出力 ・ 集 計 ・ 印 刷 な ど デ ー タ 処理 を 中 心 に N88BASIG 
の 基本 プロ グラ ム を 実習 し ます 。 


ラン ダム アク セス ., 更新 , 配 列 , 分 類 , 割込み な ど 実務 向き プロ グラ 
ム を 実習 し ます 。 


640x400 ド ッ ト の 画面 に よる 作 表 ・ グ ラフ ・ 
ど グ ラフ ィ ッ ク 技 法 を 実習 し ます 。 


パソ コン 導入 の ステ ッ プ , ファ イル 設計 , 更新 や 分 類 の 実際 例 な ど 
パソ コン を 実務 に 活用 する た め の シ ステ ム 設 計 を 解説 し ます 。 


その 他 各 種 コ ー ス を 用 意 


| @ 採 作 コ ー ス 半日 で 操作 を マス ター Y3.000 。 | 
@CP/M コー ス 


人 @ 滞 字 ワー プロ コー ス 
@PC8801/8001 比 較 コ ー ス 代 ア プリ ケー ショ ンコ ー ス 
信 簡 易 ソ フト コー ス 人 @ 企 業 セ ミナ ー コ ー 

一 初め て の 方 の 標準 カリ キュ ラム 

管理 職 の 方 や OA 推 進 の 方 に OA に 向け て の 実践 カリ キュ ラム 

(・ ビジ ネス 入門 コー ス )= 胸 (、 ビ ヒジ ネス 設計 コー ス ) 


ビジ ネス 入門 コー ス 


プロ グラ ム 初 級 コ ー ス 


プロ グラ ム 中 級 コ ー ス 
グラ フィ ッ ク コ ー ス 


ビジ ネス 設計 コー ス 


画面 合成 ・ 漢 字 処 理 な 


夜間 コー ス : 0 日 間 \46,000 
入門 か ら プ ログ ラミ ング まで 夜間 集約 
コー ス 
夜間 コー ス の お 問合せ は 

容 03-499-2872 
(日 本 情報 通信 シス テム ) 


実務 シス テム の 開発 を めざす 方 に SE 養成 カリ キュ ラム 
に ビジ ネス 入門 コー ス )= 胸 (プログ ラム 初 組 コ ー ス )= 天 ( 


ビジ ネス 設計 コー ス ) = 珍 (プロ グラ ム 中 級 コー ス ) 


BASIC 習 得 を めざす 方 に ブロ グラ マ 養 成 カ リキ ュ ラ ム 
(、 ビジ ネス 入門 コー ス )= 胸 (( プ ログ ラム 初級 コー ス ) = 夢 (. プ ログ ラム 中 級 コ ー ス ) 


N88BASIC の すべ て を 知り た い 方 に 上 級 プ ログ ラマ 養成 カリ キュ ラム 
(ビジ ネス 入門 コー ス ) = 随 (プロ グラ ム 初 級 コ ー ス )= 有 ( ンー 9 


NJK オ リ ジ ナル ソフ トニ = 
フェ イマ スソ フト シリ ー ズ は 
3 あら ゆる 業務 を 強力 に サ 
四 ボー ト し ます 
カナ 漢字 変換 入力 サ プ ル ー チ ン (PC-8800 用 ) 
5 イン チ \20.000 /8 イ ンチ \21.000 
XREF-80/88 (クロ スリ ファ レン ス ・ プ ログ ラム ) 


AUTo START プロ グ ラム 
1 ドラ イブ 用 FORMAT BACKUP プ ログ ラム 


\4.000 


AUTO-1 \28.000 
わずらわし い プ ログ ラミ ング 作業 は も う 不 要 。 コ ン 
ビュ ー タ と の 対話 形式 で あら ゆる 業務 情報 を 誰 に 
で も 簡単 に 処理 で きま す 


衣 その 他 NEC・PC シ リー ズ 用 ソフ ト 各種 
CP /M(PC-8000 用 ) 

CP/M-86 (N5200 用 ) …・ い 
IRIS80 (ノン プロ グラ ミン グ 電 子 カ ー ド ) 
PC-8000 用 日 本 語 ワ ー ド プロ セッ サー…… 
STAT80・ 

販売 管理 バッ ケー ジ (中 小 企業 向 )… 

財務 管理 (中小 企業 向 ) … 
在庫 管理 ( 低 価格 、 オ フ コ ン 並 み 機能 ) 
UCSD PASCAL Ver.4 0 
UCSD FORTRAN Ver.4 


GRAPH WRITER-88(V2.0) 

汎用 スケ ジュ ー ル 管理 シス テム 

APOX Ver.2 (TSS オ ン ラ イン 用 ) 

APO(ACOS to Personal computer Online) 
\ 116.000 

為替 レー ト 予 測 プロ グラ ム 

(先物 レー ト の 予想 値 算出 ) 

SS 販売 管理 シス テム 

BASIC 独 習 プ ログ ラム (テー プ 版 ) 

N-BASIC 領 域 拡張 用 DOS 


@ お 問い 合わ せ は 
販売 / 教 育 / シ ステ ム サ ポー トル ュー ド & ソフ ト 開発 / メ メン テ ナ ン ス | 
AM と CC マイ コン ショ ッ プ 


玉生 / パリ ココ セブ ヴ ガー 


〒I50 東京 都 渋谷 区 渋谷 2-22-3 渋谷 東 ロ ビル 容 03-499-2671 


大 阪 / て リコ セー ロー 名 古屋 パリ ココ セブ ヴー 


〒541 大 阪 市 東 区 安土 町 2 30 大 阪 国際 ヒル 会 O6-264-6033 〒460 名 古屋 市 中 区 錦 2 2 4 丸紅 ヒル 容 O52-202-6565 


日 本 マイ コン セン ター 渋谷 (JMC グ ルー プ 本 部 ) 


〒!50 東京 都 渋 谷 区 渋谷 2-22-3 渋 谷 東 ロビ ピル 容 03-499-2890 


ATK SH 日 本 情報 所 究 セ ブロー 5 


本 社 /〒150 東京 都 渋 谷 区 渋谷 2-22-3 渋 谷 東 ロビ ル 容 03-499-2671(OA 事 業 部 ) : 


PC-8801、PC 


LC マイ コン ショ ッ プ 


JMC シ ステ ム ィ > 有川 旧 椅 


本 格 派 パ ソコ ン シ ョ ー ル ー ム SM の 0 @ 営 業 時 間 AMI0:00 一 PM6:30( 日 祭日 休み ) 


6000 に よる 


る 前 


給与 計算 、 財務 会 計 、 
他 多 数 実務 ソフ ト 展 示 販 売 


NEC パ ー ソ ナル コン ピュ ー タ ー 
人 @PC-8800O 
@PC-800O 
@PC-6OOO 
@N5200-O5 


中 Oi に て ) 学 226 あ 9 の 2 
dMG HK7 イ 7 コンビ ュー ダ 村 人 


本 社 
横 
新橋 営 


テテ 


ワー ド プ ロ セ ッ サ 実 : 


( 刺 


〒102 東京 都 千代 田 区 麹町 4-5 Tel 03(230) 0041 ( 代 ) 
業 所 プ 〒220 横浜 市 西区 北幸 1-8-4 横浜 西 日 第 2 ミナ ト E ッ と (Bit-INN 横 浜 内 ) 
( 業 所 〒105 東京 都 港 区 西新 橋 1-5-10 Tel 03(508) 8881 ( 代 ) 


21 貴 ビ ん 


Tel 045(314) 7707( 代 ) 


欄 APPLE II 又は PLUSI6K ラム シス テム 
宜 APPLEII 又 は PLUS32K ラム シス テム 
宜 APPLEII 又 は PLUS48K ラム シス テム ・ 


哀 APPLE DISKI/O 付 DOS3.3・ 


1 ) クレ ジッ ト は 東京 スタ ンダ ー ド で / 


・\ 25, 000 4 
-\290,000 か 
※ は 、 お 問合せ くだ さい 


・\168,000 4 


@ 右 記 の 内 、 和 希望 品名 ・ 回 数 を 明記 の 上 、 申 込み 下さ い 


( 頭 


| 晶 


[回 数 | 頭金 (前 払 | 和 回 払 ( 後 払 )| 支出 合計 | 


人 金 の ある も の は 、 頭 金 と 共に お 申込 み 下 さい 。) 送 料 込 価格 
@ そ の 他 の マイ コン ・ 端 末 あ り 、 お 問合せ 下さ い 
人 回 数 は 3、6、10、15、18、20、24、30、48 の 中 か ら 選 べ ま す 
@ ア フタ ー サ ービス 完備 。 @ 頭 金 変 更 、 ボ ー ナ ス 払 い 可 能 


名 | 回 数 | 頭金 (前 払 )| 各回 払 ( 邊 払 )| 支出 合計 名 


は を 科 2 50,000 円 6 

50,000 | 

シャ ー プ 0 | PC-8801 ] ※※ 

48K 2 | 日 電 230,000 円 

| 3 259,200 円 | 
273,600 円 | 


に 


+ 
50,000 円 当 
し 送 


50,000 円 
| 


30.,000 円 


《 分 割 払い 例 ) 


※ は 、 お 問合せ くだ 


さい 。 


品 名 


固 数 | 頭金 ( 


前 払 )| 各 回 払 ( 後 払 )| 支 計 


MZ-2000 


シャ ー プ 


際 


50,000 円 
50,000 円 
0 


0 
0 
0 


10,800 円 
6,800 円 
5,400 円 


素 

※※ 

※ 
21I6,000 円 


244,800 円 
259,200 円 


30,000 円 
| PC-6001 0 
日 電 


50,000 円 
50,000 円 


APPLE 
又は PLUS 
32K RAM 
本 組 8 


100,000 円 
100,000 円 
er 


33.,900 円 
20.800 円 
!8,.300 円 
17,200 円 
10,700 円 

8,500 円 


ーー 

キ 
344, 000 円 
385,200 円 
408,000 円 


_GP-80-D 
PC-8001 
日 電 


32K 


] 


APPLE Il 
又は PLUS 
48K RAM 


35,700 円 
21.800 円 
19,.000 円 
17,700 円 
中,000 円 


8,800 円 
に 


際 
※※ 
補 
354. 000 円 
396 , 000 円 
422, 400 円 


21,100 円 
12,900 円 
12,800 円 
10,000 円 
6,200 円 
4.900 円 


※※ 
2 
之 
200,000 円 
223,200 円 
235 ,200 円 


MZ-1200 
シャ ー プ ブ 
32K 


門 
亭 
率 
7,400 円 
4,600 円 
3,700 円 


率 

Pd 

門 
148,000 円 
165,600 円 
177,600 円 


PA7010 
東 芝 
バン ビア 


FM-8. 
PC-8001 用 


50,000 円 
VIC-1001 MP80F /T-3 | 50,000 円 
コモ ドー ル 


2 由 | (PC-8001 用 ) 0 
の 70,000 円 | 0 
> 0 

0 


30,000 円 20,000 円 
GP-80P 0 


と | 0 
セイ コー 0 ・ 1 ※ | | 0 
プリ ンタ ー 0 76,000 円 |] | 


5 郵便 振 | 
49308) 公 し 代金 引換 払い は 実 費 が 加算 きれ ます 。 旬 通 販 部 供 


で ① 現 金 書留 ②⑫② 電 


3③ ハ ガキ 


$ 郵 便 為 替 


アン 東京 スタ ンダ ー ド | 


4.800 円 
3,000 円 


F] 
率 
牽 


,800 円 
,800 円 
,400 円 


,100 円 | 


700 円 


6,100 円 


700 円 


,400 円 
,200 円 
,700 円 
,500 円 


,200 円 


500 円 


,600 円 


100 円 
,700 円 
,300 円 


96,000 円 
108,000 円 


2i6,000 円 | 
244,800 円 | 
259,200 円 | 

率 

率 

牽 
94,000 円 


| ※※ 

| ※ 

※ 
90.000 円 | 


144,000 円 | 
!62,000 円 
172,800 円 


TV 係 ま で 


145 東 京都 大 田 区 上 池 台 3-25-3 TEL 東 京 03-727-8101 


LAMIC と は Laox Micom Club の 略称 で むれ マイ コン クラ ブ 
3 あい の 輪 を ひみ た. 情報 交換 な F に 役立て て いき た いと 思い まま も 尚 3.000 円 以上 
5 和 C の お 買い 上 げ の 方 な ら ど な た で も 会 員 に な れ ま も 


葉 91 ン チ フロ ギー ディ スク MZ-2000 


に 前 ー ドレ ス 補間 64K パ 人 オー ル RAI LAMIC ゝ テー プ を 会 | 護 。 
上 が 2 生 仙 SE 1 . ソ フト テー プ を 会 員 特 別 価格 で 提供 


ゅ フィ ッ ク 機 能 に = ゴ 上 口 と っ あの ナ 、 
本 人 Y220.000 e 標準 価格 Y218.000 中 寺 』 2. 新 製品 発表 会 や 工場 見 学会 な 
庄 昌 と 持 別 催物 に ご 招待 いた し ます 。 


FUJITSU。 MICRO-8 東芝 バ パソ ピア 
2 っ の CPU や 64K DRAMZ ド レズ を 。 6K パ イト の メイ ン メ モリ RAM、 
間 128K パ イト な 本 格 派 パソ コン 。 漢 1 32K パ イト の BASIC 用 ROM 及 
チキ ャ ラク タ セ 小 を 装着 すれ ば 日 本 ーーー は び I6K パ イト の ビデ オ RAM を 禁 
語 表 示 5 可 能 。 準 実 装 。 

文 本 体 標準 価格 Y 218.000 二 本 体 標準 価格 Y 163.000 


| バン コン が 更に お 求め 易く な っ た | 
ーー ン 50BNRRNIG2 = 金利 が グー ン と お 安く な っ て し か も 3 一 60 回 払い の お 得 な 
| ーーー レー ゃ に 1 
本 人 : 液 各 アス ブレ 付 マ 1 2 ロブ リ ラオ ックス マイ コン ク レジ ッ ト 実 施 中 
シタ を 内蔵 し た 4- ル ・ 人 7 シタ イプ (介し .30 万 円 以上 の お 買い 上 げ の 場合 に 限ら せ て い だ 7 ど き ) 
の ハン ド ヘ ルド コン ピュ ー タ \ ほ 圭 詳 し く は 係員 まで ご 遠慮 な 《 お 問い 合わ せく ⑰ ど きい / 
ぁ 捕 準 価格 Y138.600A7 タ 7% "業務 用 に バ パソ コン を リー ス い た し ます 。 

e 地方 発送 も 承り ます の で お 気軽 に お 申し 付け 下さ い 。 


や 。 コ 
新宿 マイ コン 学院 で は 、 女性 イン スト ラク ター が 
て いね い に 、 わ か りや すく ご 指導 いた し まま 
e 学生 割引 の 特典 が あり ます 。 詳 し く は 係員 和 
っ ^* 疾 較 プロ グラ ム 相 談 室 
新宿 店 < く 5F> に は 世界 の ゲー ム ソ 9 プロ グラ ム の こと な ら 、 何 で も 不 り な 県 に 
フト 10.000 本 以上 く <6F> に は ビジ ネ N 1 応え し て いま す - 
スソ フト 1 .000 本 以上 が 大 量 入荷 1 


@ 毎 月 第 1・3 土 曜日 e PM6 :00 一 


6 で コン の 
NN すこ マン の オフ ィ ス 座 命 は 勿論 自営 業 の 方 6 g 際 に 全 新宿 マイ コン 学 陳 
> 仙 さ 和香" 仁和 理 な の と ぁ つけ 7/ ゼ マ - コ インテ 
上 こ て \ と し 3 に す 


MLC マイ コン ショ ッ プ の 方 が 、 ご 相談 に リー “= っ 中 6 
マコ シシ ディ 境 條 店 じ ま 較 モ rimiirm(354)8571t 


ラオ ックス パソ コン 取 拡がる ラオ ックス マイ コン シテ ィ 
ー 3 | 【( 0 遇 際 | 


寺 首 


コ 


新宿 店 志 寺 需 到 we 950-1241 の 5 計 に 一 iF (0470 

の @ 秋 式 店 一 叶 縛 圭一 高 253-7111 稲毛 店 一 半 線 滞 ⑳ ぁ 59-2136 

吉祥 寺 店 -- 彰 券 需 m 21-9471 の の 導 ーー が -cs (0522・-2722 

三鷹 店 - 半 壮 半 あめ 92-3741 W 大 和 店 一 生計 (⑯61-2010 
ッッ シッ ー 靖 線 。 %⑯259-7111 人 岩槻 店 ー 縛 誠 計 997 -256 1 

⑩ 市 原 店 - 信 5- e21-5331 人 g 了 大宮 店 一 デー 644-3551 


支 吉祥 寺 店 、 厚 木 店 オー ディ オ 館 で も マイ コン 教室 の 生徒 を 募集 し て いま も 


AMC パー ソナ ルコ ンピュータ フル ライ ン ア ッ プ / 
PC-6001 PC-8801 PC-8001 


最強 // 人 気 最高 / 


あな た の パピ コン // ビジ ネス 用 に 


\89,800( 本 体 の み \228.000( 本 体 の み \168,000( 本 体 の み 


きけ へ ベロ 
クリ ー ン 
コシ ンピュータ 


MZ-Z000 


\218.000 
全社 ロー ン OK (3 一 30 回 ) 、OPEN09:00--20:00 水曜 定休 


ショ ッッ 典 橋 第 一 無線 


440 豊橋 市 葵 町 第 一 通り TEL O532-54 - ら 245 


初級 マイ コン 教室 
無料 開催 中 


尾 初 は 誰 で も ビギナー で す 。 


マイ コン は 意外 に 難し い 。 い ざ マ イコ ン を 使う 段 に な っ 
て 用 語 や 使い 勝手 で 尻 ご みす る 方 は 多い よう で す 。 そ ん 
な 時 は ぜひ ケイ ワ へ お 出 で 下さ い 。 豊富 な ノウ ハウ で あ 
な た の お 役に立ち ます 。 各社 の パソ コン は も ちろ ん , ケ 
イワ の オリ ジ ナ ル 周 辺 機器 も 用 意 し て ご ざい ます 。 


還 Personal Computer 


ン は と れ ? 


直 土 通 


MICRO8 
\218.000 


PASOPIA 
PA- 7010 
\163.000 


広小路 通り 


駅 前 大 通り 
[し イーー ナ オー サー ネー サー ャ ー ト ーー ネー ネー トー トー て 


* ケイ ワ , オリジナ ル PC-8001 用 周辺 機器 シリ ー ズ 


株 式 会 人 の 電 ン ア 『 ダ 


〒101 東京 都 千 代田 区 神田 佐久 間 町 1 -16 谷 03(257) 0664 代 
営業 部 ・ 通 販 部 〒115 東京 都 北 区 志茂 2-21-2 合 03(903) 5551( 代 


PN  C : PC-8800 シ リー スズ rr ー ボ ー ド | [ _PC-ROM ボ ー に 識 導 | 
本 体 PC-8801 \228.000 計っ ROWS 9784. 399 オー ビ ト だ に 4 本 の 2716RON を 実り 
さこ に の 接 徹 ケ ゲル 付 PC の 杭 能 を 
PC-8000 シ リー ズ Y16.800 Y4.500 
本 体 PC-8001 \168.000 生得 の 5ROS 時 
PC-6000 シ リー ズ : | マルチ CG カ ー ド PC8001 用 拡張 ユニ ッ ト | 
本 体 PC-6001 \89、800 に た に 生 の や ーッ ジ を 合え ます 。 2K RM ツケ ント 、 081 ディ 
富士 通 :MICRO8 HRPRH を 2 コメ けけ 
本 体 MB25020 218.000 Erozie 1 に 8。 NHBASIC ROM を 地 設 32K RAM に 衝 
ル シャ ー プ : M-2000  \218.000 。 。。W10.000 ター プー ニュ ア ル 0 
・ PASOPIA Y64.000 
0 近 本 体 PA7010 / 7012 \le3.000 PC モニ ターROM 
な PC-ROM ボ ー ド + PC モニ タ ROM セ ッ ト \10、000 
p EPSON : HC-20 \138、600 の モニ ターROM の み Y5.000 


AX-1 PC-8001(32KRAM) 念 12 型 グリ ー ン CRT 


\189.000 

XX-2 PC-8001(32KRAM ) 久 カ ラーCRT 
\216.000 

B - 1 @PC-600| 
\84.800 


_ 人 @PO-600| @ マ イコ ン 再 用 
デー タレ コー ダ 
\91.00O 
DX-1 @MICRO-8 
@ キ ャ ラク タ セ ッ ト 
@|2 型 グリ ー ン CRT 
\271.000 
DX-3 @MICRO-8 
@⑯ キ ャ ラク タ セ ッ ト 
@|4 型 高 解 像 カ ラー 
CRT 
\336,00O 
=1 @PASOPIA 
@|2 型 グリ ー ン CRT 
\185,.000 
あ ) @PASOPIA 
@|4 型 カラ ーCRT 


\216.000 
-1 @PO-880| 久 党 字 ROM ボ ポー ド 
@ モノ クロ 高 解 像 CRT 娘 ホビー か ら 本 格 的 業務 用 
まで 、 マ イコ ン の も つ す ば らし い 能 力 
\298.000 を 、 全力 を あげ て お 役に立て ま 衝 
に 2 @PC-880| 久 若 字 ROM ボ ー ド 急 |4 型 高 解 像 CRT 支 全 メ ー カ ー 商 品 取扱 い 。 支 初心 者 、 地 方 の 方 
\354.000 で も 大 切 に し ます 


マ ザ ニス ンジ ュー デーー ビ ー 


人 4AMOep の 


@ 赤 坂 店 PM6 :00- 8:00 


先進 の 16 ビ ッ ト | 洗練 の ビット 


N5200 モテ ル 05 ロビ -8801 
シス テム 標準 価格 本 体 標 準 価格 
学 B98,00D 学 pP8,00D 


4⑳ プ コシ ピコ ラー タタ 数 窒 
直 素 和 本 能 ポ ーー に 実務 で 使い こ な 
1 万 能 計 算 ソ 7 トコ ー ス (2 <ー ス ソン フト ・ コ 


(ソン フト に ド 特別 価格 ) 
京 6-18842) ③ 銀 行 振 : 二 中 野 駅 前 答 4496001) 
区 時 を 34-24 千野 ビル 3F 
赤 都 港 区 2-17- 54 パ バレ ロワイヤル 赤 坂 中 - 225 
文 中 野 駅 南口 徒歩 | 分 友 陸 3 支 赤坂 駅 5 番 出口 徒歩 3 分 娘 


829800 全国 どこ で も て いね い 無 料 配送 都内 近郊 夜間 配達 半生 


年 中 無休 AMI0:00 一 PM8:00 


理 導 表 生 いざ 両 責 


あな だ こと 共に すこ し 未来 を 見 つめ ます 。 


兄 る より 航 77 
AM あの バジ コ 。 


パソコン か ら OA ま で 

ソフ ト も ハー ド も トー タル で 

AG 大 孤 が ご 提案 し ます 。 
た と えば ゴル フ に し て も 実際 に プレ イ し な けれ ば 面白 き は 半 人 。 
パソ コン も そう だ 、 じ っ と 眺め て いる より も 、 も っ と 気軽 に 触っ て みよ う 
AG 大 阪 で ぜひ 一 度 
(、A あ が 初め て 実現 し た 、 パ ソコ ン の ライ ン アッ プ ) 
e PC-6000 ジ リー スズ PC-8800 コ リー ズ - 本 格 的 な WCOA 


e 本 体 標準 価格 89.800 円 @ 本 体 標準 価格 228,000 円 ジョ ー ノ ビー ム 


PC-8800 


@ PC-8000 ヨ リース eeN5200U も zL0D5 EC マイ コン ショ ッ プ 
@ 本体 標準 価格 168.000 円 シス テム 標準 f 5 
IROBep の MA [AG ロ 大 孤 
NHK 大 阪 文 化 セ ンタ ー 提携 ヤマ イコ ン 教 室 マイ コン の 時 間 貸 し 大 阪 駅 前 第 4 ビル 2F・ 教 室 5F 


多 穫 で 


笑 し だ ュ ラ ム と 優秀 な - -8800 シ リー ズ ぇ ー ーー 
PA で 2 "EKca。 を ロ 5(341)381 呈 


し 2 いり 今 
ら グ イズ スズ の アナ ウン ザ ー 
あな た の パン コン が あな た の 産声 で 応答 する / 
特 和 人 ER 
田 ADPCM 方 式 に よる 超 高 明瞭 度 ( チ ャ イム 、 BGM 可 ) 
一 超 小 型 (142mmX144mmX2Imnm、 ケ ー ス 寸法 )VP1000 
田 最 長 3 分 40 秒 の 音声 出力 (VP 2000) 


一 5W (代表 値 ) の モニ ター 出 語 の YO 
圏 ソフ トウ エア に よる 音声 組合 わせ 可能 


仕様 較 WERSSRS 
田 電 涼 : DC5Va5 多 
y 500mA( 代 表 値 ) 


田 入 出力 制御 端子 :20 点 
田 出 力 : オ ー デ ィ オ 出力 、 ス ピー カー 出力 付 


で 
人 社 の チー 人 人 臣 価 格 。 VP2000VP1000 


コン ピュ ー タ の サー ビス も 行なっ て いま す 。 欠 オー ダー メイ ドコ ンピュータ 欠 フ ォ ー ム 用 紙 介 ディス ケッ ト 等 ご 用 命 く だ さい 。 


今 和 な ニーズ を 予測 し 、 常 に 高 技術 、 高 信頼 で お 応え する 贅 AM。 
IKAM . 鎌倉 電子 工業 株 式 会 社 


洒 織 デモ 機 50 台 、 ソ フト 600 種 ・ 約 2000 巻 常時 展示 . ノ 
ビッ クス ケー シレ の メカ トー 無線 ペー ツモ セン ダー 
関 還 証 還 還 間 較 当 び めい た 9 機種 選ぶ ぶ の は あな た . グ 


コモ ドー ル ・ パ ー ン ソナ ルコ ンピュータ NEC・ ヾ パー ソナ ルコ ンピュータ タン ディ ・ パ ー ン ソナ ルコ ンピュータ 
1IVIC- 000ー ス [4IPC-6000-> 1Z1TRS80。i 
ーー 


手軽 に ゲー ム が 楽し め て BASIC 学 習 に 最適 誰 で も 使え る 豊富 な 周辺 機 が 


@CPU:6502 。 @ カ ラー テレ ビア ダ プ ター 付 すぐ に 使え る 魅力 で ま 
@RAM:5K バ イト 旬 ROM:20K バ イト 2 パピ コン 
* PU: 
@CPU:Z-80 相 当 人 


@RAM:16K バ イト 
@ROM:13K バ イト 
介 28※48 ド ッ ト 


@RAM:I6K バ イト 
@ROM:I6K バ イト 
例 256X192 ド ッ ト 


中 
分割 特価 90.000 円 @ 分 割 特価 /90,000 円 @ 分 割 特価 - |48,000 円 
本 体 VIC-1001 @ 申込 金 (頭金 ) ナシ 本 体 PC-6001 @ 申 込 金 (頭金 ) ナシ TRS 80 モ テル 1! ゅ 申込 金 (頭金 ) ナシ 


I6K RAM VIC-1111 (テレ ビ に 継い で 使用 で きま す ) 2 皿 (モニ ター 付 ) 月 コロ 
2 きる 計 価 容 89.600p は AUU UM 内 人 Wa、 | 000 ロ 2 抹 机 本 ga、 14.800 ロ om 
F 東芝 バー ソナ ルコ ンピュータ 上 NEC・ ン *ー ン ソナ ルコ ンピュータ 【-】 富士 通 < バー ン ソナ ルコ ンピュータ 
問 半 FUJIT ち ちり 
ノ ? ソ ピア PC-8000 シ ン の ズ MIC エ 〇 


ベ べ ベストセラーPC は 
プロ が 作っ た 本 格 派 パソ コン 標準 機 / 応用 いろ いろ 


本 ララ 富士 通 の 自信 作 。 
高 解 像 グ ラフ イッ ク が め CBI2580 9 


楽し め ま あ る @RAM: 32K バ イト @CPU:6809X2 
6 ⑯ROM:24K バ イト @RAM:32K+ VRAM 
@CPU:Z 80A 160X100 ド ッ ト @⑯ROM:32K バ イト 
@RAM:32K バ イト @640X200 ド ッ ト 
@ROM:32K バ イト 
@640※200 ド ッ ト 
分 割 特価 210,000 円 @ 分 割 特価 ^210.000 円 e 分 割 特価 270,000 円 
本 体 PA-7010 申込 金 (頭金 ) ナシ 本 体 PC 8001 e 申込 金 (頭金 )- ナ シ 本 体 MB-25020 申込 金 (頭金 ) ナシ 


グリ ー ン モニ ター PA-7150 / 罰 グリ ー ン モニ ター PC 8050K ん 結 グリ ー ン モニ ター MB-27302 / 軸 15 回 
2 さる 計 価格 208000 ロ < 還 納 UUU 誠 | 2 計 im207800 由 を 14,000 ロ ig 1 人 夫 電導 待 Yi、 | 10.000 ロ 5 
| シャ ー プ バー ソナ ルコ ンピュータ 【:】 NEC・ バ パー ソナ ルコ ンピュータ ン ヨ ー・ バ パー ソナ ルコ ンピュータ 
トノ | 
1Z- る 00 PC-8800 シ シース | ヨ |$sacyo 有 BL- 目 


これ か ら は 、 マ ル チ ・ ラ ン ゲ ー ジ の 時 代 で すれ 最新 鋭 機 CP/M で 走る 。 ビ ジネス 向 マ シン 。 


@CPU:Z-80A どこ まで で きる か 
@RAM:64K パ イト 挑戦 し よう 。 @CPU:Z 80A 


葛 RAM:64K バ イト 
@ROM: BOOT 用 
/ @320K DISK 付 


@ROM:LOAD 用 


@CPU:Z 80A 相 当 

@RAM:64K 二 VRAM 
@ROM: 40K 十 32K 
人 @640X400 ド ッ ト 


@ 分 割 特価 - 225,000 円 e 分 割 特価 - 300,000 円 分 割 特価 400,000 円 
MZ-2000 @ 初回 金 (頭金 )/ ブ ナシ 本 体 PC-8801 申込 金 (頭金 )- ナ シ MBC _100 込 金 (頭金) 


(モニ ター、 カ セッ ト 内 蔵 ) モノ クロ モニ ター PC -8851 (モニ ター・DISK 内 蔵 ) 
靖 和 Wa、: 1D.000P- im 】 計 和香 和夫 生生 、2U.000 ロ im 価格 98.000 円 を 


カト 無線 パー ツ セ ンタ ー が 通信 販売 で 午 便 は が き | s 衝 人 1 昌 込 券 : 傘 電 話 で も お 申込 みい た だ け ま まあ 水曜 定休 
お 届け いた し ます 。 お 気軽 に ご 利用 下さ い IDIO 半 yrdroyriee 時 : 

に に 較 e 由 る | おる 新 フリ カテ) :E 有 | ・ 多 ず 無印 下 きい 。 
@ お 届け は @ お 支払 い は カ ゃ お と し < 番号 に 〇 ) 印 し て 下さ い 。 ス アン の 
お 申込 みい た だ いた 商品 (① 銀 行 自動 振替 (② 郵 便 局 振込 み ト 吉 | * 4 ス 「 ラ フリ 名 古屋 (052) 26 -64 1 
は 送料 を 全額 当社 負担 の いずれ か で お 願い し ます 。 ② の | 辱 | < お ga 提 を | | 1 | 44| 7 
て お 宅 へ 直接 お 届け 致し 場合 は 月 末 に 当社 か ら 振込 用 紙 (回 Os |21518 | SM 
ます 。 お 申込 み と 異な る 商 数 分 一 括 ) を お 送り いた し ます 。 な ュ 株 攻 (っ か 3 人 根 科 IGS 世 人 1 : 略 の 舌 付 は 生 商 10 か ら 各 7 時 志 で す Meet 
唱 が 届い た 場合 、 交 換 又 お 一 括 払 で お 求め の 場合 、 お 電話 ウ 電 | に * < い U こい 人 っ 2 ぐま 
は ご 返品 に 応じ ます 。 で お 申込 み の 上 ご 送金 下さ い 係 ッ \ HB 6 カト 一 無線 ノ パー ツ 株 バ ツ セ ンタ 

忠 28 目 ・ ・ 


〒460 名 古屋 市 中 区 栄 3 丁目 32-28 


20 才 未満 の 方 は 保護 者 の ご 秦 名 、 控 印 も お 願い いた し ます 一 


パー ソナ ルコ ンピュータ が 誕生 し て 10 年. その 目 ざ ま し い 進 歩 と 利用 範囲 の 拡大 ( 

の 高 性 能 化 に 加え て 、 パ ー ソ ナル コン ピュ ー タ を 標準 化す る CP/M の 登場 に より 3 

まし た 。 こ の CP/M が 走る ハー ドウ ェ ア な ら ば 、 メー カ や 機種 が 異な っ て も 、 す で に 

開発 され た 4.000 以 上 と いう 膨大 な ソフ トウ ェ ア の 鞭 積 を 即 、 利 用 で きま す . この よう な 
汎用 性 を も つ CP/M は 、IBM を は じ め と する 600 以 上 の コン ピュ ー タ ・ メー カ が 採用 し た こ < 
より パー ソナ ルコ ンピュータ に は 欠か せな いも の と な り ま し た 。CP/M と は 、 つ まり 、 ユ ー ザ 避 
利用 範囲 を 大 きく 拡げ る スタ ンダ ー ド ・ オ ペレ ー テ ィング ・ シ ステ ム な の で す . 利用 で きる ソフ ト 


ウェ ア の 乏しい パー ソナ ルコ ン ピ 株 式 会 社 マ イク ロ ソ フト ウェ ア ・ ア ソシエ イツ 
ュー タ は 使え ませ ん 。 ポイ ント は 〒!07 東京 都 港 区 北青山 3-2-2AY ビ ル 容 03(497)0381 


rcP M が 走る か 」 と いう こと で す IMICTOSOItwWgle ASSOCialeS 


3 


3 
63 coYT eo 9 
OO の 0 
も Po an 2 び ぷ ぶ 


ュ \ イ ・ テ クロ ジー の 人 移 端 を が < 菊 某 原 に 、 
会 メー カー 法 硫 の ラン と テー ター 偽 學 革 如 ニヤ マギ ワ テ クニ カ 半 衝 。 


コン ピュー ター ハウ ス 


3 。 
0 


yamaqiuua ECnia 


テク ニカ 店 東京 都 千 代田 区 外 神 田 4-3-| 
6 紀 者 TEL (03) 253-0121 (代表 ) 
東京 本 店 TEL(03) 253-2111( 大 代表 ) 


横浜 店 TEL(045) 261I-2111 (代表 ) 
世田谷 店 TEL(03) 483-3111 (代表 ) 
千葉 店 TEL(0472) 25-2111 (代表) 
大 阪 店 TEL(06)643-21I1I( 大 代表 ) 


全 メ ー カ ー の 注目 集め て コン ビ ピュー ター の 
大 型 専門 店 「 ヤ マギ ワ テ クニ カ 」 が オー プ " ン 

豊富 な 機種 と と の 周辺 機器 を 一堂 に 展示 。 

使い 方 は も ちろ ん 、 最 新 の 商品 情報 ・ ソ フト 開 

発情 報 まで 専門 相談 員 が お 教え し ます 。 ま 
た 、 ノ パソ コン 情報 誌 、 ソ フト ・ ラ イブ ラリ ー、 各 
種 教 室 開催 な ど 。 ヤ マギ ワ な ら で は の 専門 店 
発想 か ら 生 まれ た 画 期 的 な 店 づく 9 を 実現 . 
自由 に 触れ て 選べ る 、 全 国 オ ン ラ イン の 体験 
基地 と し て 、 あら ⑩ る ご 要望 に お 応え し ます 


コジ に イヤ ダー バウ 
ヤマ ギ ワ デ テクニカ 。 :- 
@5F イベ ント ・ フ ロア 

(スタ テイ ・ フ ロア ) 
急 4F ワー ブロ ・ フ ロア 
@3F ビジ ネス 0A フ ロア 
@2F テク ニカ ひろ ば 
@⑯|F パソ コン ・ 


ゼ ジ ネス ・ ソ フト さく ハ ー ド 相談 室 」 

特に ビジ ネス 用 に 適し た 各社 の ハー ド と 豊富 な 簡易 
詩 語 シス テム や ア 2 リケーション ソフ ト を ぐ 、 

即 、 稼 動 で きる 状態 で セッ ト ア ッ プ 

し て いる スペ シ ヤレ レー ム 。 

お 気軽 に ご 利用 くだ きい 。 


どん な に 優れ だ た ハード を 持つ て いて も 、 それ を 自 由 に 操 つ る ソフ トウ ェ ア ~ で 

が な けれ ば 何 の 意 味 も あり ませ ん 。 それ だ け に 、 ソフ トウ ェ ア の 持つ 意味 は 重要 8 

な の で す 。 メー カー の 純正 ソフ ト か ら ソ フト ハウ ス の オリ ジ ナ ル と 数 多く 存在 し 、 池 肖 し て いま 
す が 、 そ の 明 形 こ 目的 に 適し た も の を 見 分 ける の に も 大 変 で す , そこ で 


電車 pr、 


儀 来 の フロ アー に 2 つの コー ナー を 新設 、 一 層 お も し ろく な り ま し た 。 @ ソフ ト 大 量 展 示 コ ー ナ ー @ で は より 見 や すく 、 MA ワイ ド に 取 揃 えて 
いま す 。 フ ロッ ガー トリ ッ プ に ゴル フ ゲ ー ム 。 財務 管理 に 願 客 管理 し 、 ゲ ー ム か ら ビ ジネス 用 ソフ ト ま で 、 見 る だ け で も ゾク ゾ ク す る 充実 の ソフ ト 
コー ナー で する OA に FA に と 、 ビ ジ ネ ス 用 に 活 i 用 る れる に 53281 ルレ ルー ム を 用 意 し まし た 。 こ こ で は 
各社 の ハー ド ・ 周 辺 機器 が 、 即 稼動 で きる 状態 で セッ ト ア ッ プ され て お り 、 悩 め る ビジ ネス マン に は 嬉し い ル ー ム 。 つま り 、 この コン ピュ ー タ ー は 
何 が で きる 一 一 で は な 〈 、 こん な 仕事 を る させ る に は 、 この ハー ド に この ブロ グラ ム を と 自社 機能 に 適し た シス テム を お 選び いた だ け ま す 。 お 望み な 


ら ば 、 実 際 の 仕事 内 容 に 即 し て デモ ンス トレ ーション 、 エ レシ ャ ッ ク の ノウ ハウ を 提供 で きま す 。 失敗 し な い パ ソ ュ ン 活用 は 、 一 歩 先 を リー ド す る 
東亜 エレ シヤ が る 8 ら は じ め く だ さい 。 


@ 取 扱い メー カー 
APEC SS ロ AP 己 A 紀 ! 〇 pi. づ フ デ ィ @sanyo 


temc り 4 詳 府 DASOPIA 精工 舎 cccmmcacrs 條 pplcTr EPSON| FUOJrm5O 


※ そ の 他 、 関 連 周辺 機器 ・ ソ フト ウェ ア 関 係 ・ 専 門 書 籍 ・ 雑 誌 


な ど 、 パ ー ソ ナル コン ピュ ー タ に 関係 する も の を 豊富 に 取 揃 え 、 店 内 展示 し て いま す 。 


大 阪 ・ 日 本 橋 


@ eo ゆ 東亜 レシ ッ 株 = 1 

に 寺 い 坪 1 2 引き に 
芝 無 線 グ ルー / 人 き 
〒556 大 阪 市 浪速 区 日 本 橋 5 丁 目 11 番 7 号 TEL.06(644)0111⑯ 地下 鉄 堺 筋 線 恵美 須 町 駅 北 出口 右前 


_- 普 楽 時 間 AM10:00 一 PM6:30 宮 休 昌 毎週 木 較 勲 a 


川 Computer Sur ] | 


応援 し ま む / トニ 、 マ スタ ダー。 


@ 本 体 (32K) 十 12 カラ ーCRT 十 @ 本 体 (32K) 二 12 高 解 像 カ テラ ーCRT 十 
デー タレ コー ダ デー タレ コー ダ 
PC-8001(32K)・PC-8048K・PC-8091・ PC-8001(32K)・PC-8049K・ ケ ー ブ ル ・ 
PC-6082 合計 標準 価格 257,460 円 PC-6082 
@ 本 体 十 漢字 ROM ボ ポー ド 十 14 カラ ーCRT 人 の 月 々 3.880 円 X36 回 ⑳2.4 万 X6 回 合計 標準 価格 347,660 円 
PC-880I・PC-880I-0|・PC-8853 PC-8031|-2W・PC-8898・PC-8034-2W | @ 本 体 (32K) 12( グ リー ン CRT 十 月 々 4.530 円 X48 回 2.3 万 X8 回 
合計 標準 価格 48|,000 円 合計 標準 価格 302,500 円 デー タレ コー ダ ロッ ピー ディ スク ユニ ッ ト 
月 々 4,850 円 X48 回 4.4 万 X8 占 月 々 4.830 円 X36 回 3 万 ※6 回 PC-800! (32K)・PC-8050K・ ケ ー ブ ル ・ PC-8031-2W・PO-8033 
@ 本 体 十 漢字 ROM ボ ー ド 十 14 モノ クロ CRT @8 フロ ッ ピ ー ディ スク ユニ ッ ト PC-6082 合計 標準 価格 228,020 円 合計 標準 価格 305,000 円 
PO-880!・PO-8801-0I・PC-8851 PC-8881 標準 価格 442,000 円 月 々 3.140 円 X36 回 ⑳③2.3 万 X6 回 月々 4.350 円 ぶ 36 回 ⑳3 万 X6 回 
合計 標準 価格 324,800 円 月 々 5.360 円 X48 回 ⑳3.5 万 X8 回 @ 本 体 (32K) 十 家庭 用 カラ ーTV ア ダ プ タ  @ ド ッ ト プリ ンタ ー 
月 々 4、110 円 X48 回 32.5 万 X8 回 ー 二 デー タレ コー ダ PC-8023C・ ケ ー ブ ル 
@ 治 字 プリ ンタ ー PC-8001(32K)・PC-8044・PC-6082 合計 標準 価格 157,950 円 
PC-8822 標準 価格 234,000 円 合計 標準 価格 201,300 円 月 々 3.700 円 X24 回 ⑳1.8 万 X4 回 
月 々 3.420 円 X36 回 32.5 万 X6 回 月 々 3.180 円 X36 回 ⑳!.8 万 X6 回 
信太 婦 太 丸 丸 大 容 太 容 容 雄太 太 座 太 友 座 友 誠 友 放 誠 雄太 其 護 友 誠 誠 友 友 誠 友 文 誠 友 雪 文 文 文 文太 其 文太 文太 誠 到 文広 文広 文太 大 誠 大 大 誠 誠 大 大 誠 文 
確実 に もち もの に な る 、 パ ソコ ン 独 習 コ ー ス テー ジ と 電話 で フォ ロー アッ プ 教材 ・ テ キス ト ・ 全 3 巻 / 説 明 用 カセ ッ ト テ ー プ ・ 全 3 巻 / 
で 1 の 生 2eennb の GO 門人 な が 3 尊 で 大 好 証 - 答案 プロ グラ ム 提 出 用 カセ ッ ト テ ー プ ・| 巻 / コ ー デ ィング 
BASIC・ 基 礎 コ ー ス 29.000 円 二 9 な 3 半 弥 ディ ダック と の 提携 に よる も の で す 用 紙 、 カ ナタ イプ 練習 用 教材 ・! セ ッ ト 


ハー ド と セッ ト で ご 利用 くだ さい ※ 実 務 コ ー ス (48,000 円 ) も ご 利用 くだ さい 対応 機種 : PC-8001、FM-8、 パ ソ ビ ピア 、MZ-80B 
示 罰 雄 天罰 丸 天 広 到 天 衣 誠 雪 太 雄 尋 到 容 実 実 衣 衣 衣 友 友 友 友 誠 友 友 誠 到 誠 到 護 誠 誠 誠 誠 安 容 誠 誠 誠 文 雄大 雄大 雄太 文 文 文太 文太 大 文 文太 文太 文太 文 メメ メメ メメ メメ メメ メメ メメ メメ 


APC PC-6OO1 ヒム A! 〇 「『P-110O 
上 


Ne 


@ 本 体 十 ROM & RAM カ ー ト リッ ジ 二 デー タレ コー ダ 
PC-600!・PC-6006・PC-6082 


信二 栖湖 信 格 123600 還 FP-1100 本 体 標準 価格 128,000 円 


月 々 3.590 円 X24 | 万 X4 回 5 

@ 本 体 +ROM&RAM カ ー ト リッ ジ 二 カラ ーCRT 二 周辺 機器 一 覧 表 @ 本 体 

デー タレ コー ダ グリ ー ン モニ ター _ IFP-!00I | 39.800 円 HC-20 本 体 標準 価格 138,600 円 
PC-600!・PC-6006・PC-6042・PC-6082 | 中 解像度 カラ ー モ ニタ ー FP-I002 79,800 円 月 々 3.500 円 ※24 回  ⑳1.2 万 X4 提 

合計 標準 価格 193,400 円 高 解像度 カラ ー モ ニタ ー | FP-1003 1 168,000 円 @ 本 体 † マ イク ロカ セッ ト 

月 々 3.430 円 X36 回 '④|.5 万 X6 回 ーー で N 2 HC-20・ マ イク ロカ セッ ト 合計 標準 価格 164,400 円 
@ 本 体 十 ROM& RAM カ ー ト リッ ジ キ カ ラーCRT 十 放せ な ご 上 FPEI0W9IG | SD は 月 々 3、550 円 X24 回 ⑳|.8 万 X4 回 

デー タレ コー ダ 二 セイ コー プリ ンタ ー | グラ フィ ッ ク ブ リン ター ] FP-I012PR | !39,800 円 ⑮ 本 体 + キ マイ クロ カセ ッ ト キ パー ソナ ル カプ ラ 
PC-600!・PC-6006・PC-6042・PC-6082・GP-80P フロ ッ ピー ディ スク (両面 億 密 ) | FP-1020FD 298,000 円 HC-20・ マ イク ロカ セッ ト ・CP-20 

合計 標準 価格 269,900 円 ROM 用 パッ ク FP-1031 10,000 円 合計 標準 価格 214,200F 

月 々 4.100 円 X36 回 2.5 万 X6 回 | RF モジュレータ ー | FP-ig3eRF | 12.000 円 月 々 3.680 円 X36 回 づ ④!.5 万 ※6 回 


新橋 ・ 虎 ノ 門 より 5 分 
内 幸 町 より 3 分 


公 03-591-8761(@ 


の x 当 へ 4 イレ プン 木曜 定休 


KW 明日 | つ に オー プン 


KS い * 
ぶ 横浜 西口 4 に 
の 月 生 月 バッ コン 1 が 当る グ ルク ショ ッ プ 
《 全 店 同時 開催 〉 


pk MDB11 は 全国 の マイ コン ショ ッ プ で お 求め くだ さい 。 る 


202S、 


「 汎 用 大 型 コ ンピュータ の ソフ ト が ガバ ソコ ン 
で 動く 今日 か ら 腕 で す 。MD 晶 11 が あ 
れ ば 業務 処理 の 80 光 は 今 す ぐ OK ク 


MDB11 の 7 大 特徴 


回 MDB11 で 漢字 対応 レノ 
が で きま すみ と 2 


汎用 大 型 コ ンピュータ の DBMS (デー タベース 答 理 シス テム ) 
の 思想 を ほぼ 完全 な 形 で パパ ソコ ン に 移植 し まし た 

@ デ ー タ の 記録 、 更新 、 保 守 、 条 件 検 

成 、 グ ラフ 表示 、 プリ ンタ 打出 し の 


を 4 
だ ん 、 報告 書 


、 婦 献 検索 、 ダ イレ クト メー ル な ど 、 万 能 デ ー 9 


チ を 皇 要 テー マ と する 仕事 で は プ ブログ ラム が 全く 必要 あり ませ ルル WDB ( グラ フ 化 刀 理 機能 付 
ん 。 ワー ド プ ロモ ッ サ ー、 作 表 計 算 機能 も 追加 ザ 800 Pc-800I Pc-880I 
⑯ 財 務 処 理 、 在 庫 管理 に 必要 な トラ ン ザ クシ ョ ン 処 理 5 オ プシ riER8 ほ | し ヘル ③ ん ULTII6 


ョ ン で 提供 し ます ー ン 主人 る 電 こ ん っ ッ ピ ー 版 も 完成 
科 ザー 登録 制 に バー ジョ ン ア ッ プ "時 の 連絡 、 差 粋 な 用 (300 ペ ー ジ 完全 解説 書付 ) 2 


ビ メ ン テ ルン ス し で は eg 

・ 還 mis 還 較 信和 ま の シス 導入 は 
PLOT コ ン バ ー タ が で きま す 1 フェ さ 

⑯ シ ステ ム の 内 容 は 全 公開 。 デ ー タ 処理 eo izsZ 』 16 ビ ッ ト ・ CPM・ 簡 易 言 語 

の ザ で eE022 強し ュ イ レブ ン 技術 陣 に 

@F- 日 和己 | コン バイ ラ 


市 販 の ソフ ト も 2- 4 倍 操 作 簡 単 


ここ < \ 39.000 


は 、 最新 失 種 を 20 合 常設 。 自 由 
に 操作 で き 、 各 社 の ゲー ム ソ フ ト も 
いっ ぱい / 久 ビジ ネス OA 広 場 に 
は 業務 用 ソフ ト が ズラ リ 勢 揃い 


スプ \『 ソ フン 


イレ プン で 本 体 を 購入 し た 方 


ク ) 
は 入門 コー ス と 初級 BASIC 
コー ス (14.600) が 無料 / ウル アウ に AN EE 生 | 


ソフ ト 開 発 室 は 業務 用 ソフ ト や オリ 
ジ ナ ル バ ッ ケー ジ ソ フ ト の 開発 を 、 
ハー ド 部 門 で は 制御 関係 の 開発 。 


認 良 語 五 到 呈 イレ プン で は 個 信 企 


業務 用 ソフ ト 120 本 同時 発売 (E IBM コン チ 横浜 駅 前 ショ ッ プ 。 業 で 開発 され だ よい ソフ ト を 広 ご 求 
三菱 電機 交 全 国 特約 店 ・ 販 売 代理 店 募集 中 . RS 
ROOT 日 本 一 安い 金利 振舞 
全国 クレ ジ ント 通販 可 く Ca か ッ さ 険 付 
旬 イ レブ ンク レジ ッ ト は 一 般 店 より 3| っ 釜 な 


利 な し クレ ジッ ト も 有利 で す 。 久 通 f 


コン ピュ ー タ イレ ブン 
欧 月 ビル 3F 


ンピュータ ・ イ レプ ン 
ンピュータ ・ イ レブ ン 横 浜 西口 店 
22 コン ピュ ー タ ・ イ レプ ン 名 古屋 

3- 365820 コ ンピュータ ・ イ レプ ブン 大 阪 梅田 店 


谷 03-209-7376 代 


木 
G 及 ConiipndeF 
6 
『 迅速 に お 見 積 り 致し ます 。 (見 積雪 上 ) イレ プン DAY< 超 特価 日 > 


イレ ブン フレ ン に マイ コン ショ ンプ の 方 が お ど 電 話 1 本 で ま メ ー カー 商品 (本 体 ・ 周 辺 - ソフ ト そ の 他 ) の 仕 入 ガ 出来 る シス テム イレ ブン フレ ンド 
伝導 人 に 二 洋 2 伴 ショ ッ プ 」 の 加盟 店 を 募集 し て お り ま す 。 店 舗 展示 ・ 宣伝 抗 販 サ ポー ト も 行い ます 。 お 問い 合せ 谷 03(232)0541 担 当 高橋 ・ 平 井 


コン ビュー タイ レフ ン 3232 に タイ レプ ジ 
内 ヒ ル 1F へ て Eh と ル SE 


で 1 
各 物 田 EL4E 
SN 


1 ゴゴ 


EE ・ 学 校 ・ すす 3 9 月 11・12・13 日 は 全店 


2 


ゴ 


ーーーーー ビ 


@ 製品 先取 り で 、 頭 金 な し 。 お 支払 い は 2 ヶ月 後 ./ 
@ 全国 ネッ ト の メー カー サー ビス で アフ ター も 完璧 。 
@ 全国 どこ で も 無料 配送 ./ 


@ 圧倒 的 Ln を 


分 割 回 


PC-8001 


和議 
数 | 24 | 30 | 36 142 148 
率 22117 | 21 1 23 1I28.51 3! 


PC シリ ー ズ 、 パ ー ソ ナル コン ピ 


@ 由 納 


INEC PC-8001 セッ ト 例 一 2 


* テ 
和 


の 


是 


キキ 
5 4 


池袋 サン シャ イン 60 に 、 


成 、 デ モ 機 展示 な ど 、 


き 部 四 ーー ド 
|NEC PC-8001 セッ ト 例 一 3| 


32K 本 体 † サ グリ ー ン ディ スプ レイ 専用 


テレ コ 

No120| PC-8001 32K 本 価 Yie8.000 
No1203 PC-8050K Y 39.800 
No1219 PC-6082 \ 19、800 
(キャ ッ ト フ ライ ス )〕 ー \227.600 
\4.300x36 回 2 万 x6 回 

娘 800! セ ッ ト 例 40 上 記 の セッ ト に No1131 マ 


イコ ンティー チャ ー 3 分 冊 を 加え た 場合 ・ 
Y277.100 月 々 Y\4.300X36 回 ボ 3 万 X6 回 


32K 本 体 オカ ラー ディ スプ レイ 専用 


テレ コ 

NoI20| PC-800| 32K 本 体 Yi68、000 
No1245 PC-8048K 十 (809I 付 ) Y\ 69.660 
No1219 PC-6082 Y 1I9.800 
【 キ ャ ッ ト フ ライ ス ) ーー Y 257.460 


\3.600※36 回 3 万 X6 回 

竣 800! セ ッ ト 例 39 上 記 の セッ ト に No1I31 マ 
イコ ン テ ィ チ ャ ー3 分 冊 を 加え た 場合 ・ 
\306.960 月 々 \3.600X36 回 お 4 万 X6 回 


@ 有 納 


32K 本 体 カラ ー デ ィ ス プレ イー 専用 
テレ コ +SEIKOSHA GP-250F 


Nol20| PC-800| 32K 本 体 \168,000 
No.1245 PC-8048K 十 (809| 付 ) \ 69,660 
No.I219 PC-6082 \ 19,800 
No.124| GP-250F(PC-800| 仕 様 ) \ 96,500 

[キャ ッ ト プ ブラ イス 〕- 一 \353.,960 


\4.8 00 36 回 4 万 x6 回 

太 8001 セ ッ ト 例 43 上 記 の セッ ト に Nol131 
マイ コン ティ ー チ ャ ー 3 分 僅 を 加え た 場合 ・ 
\403,460 月 々 \6,400X36 回 志 4 万 X6 回 


|NEC PC-8001 セッ ト 例 一 60| 
32K 本 体 二 TV アダ プ タ 専用 テレ コ 


Nol20! PC-800| 32K 本 体 Y168.000 
No1202 PC-8044 \ 1I3、500 
Nol219 PC-6082 Y 19.800 
【 キ ャ ッ ト フ ライ スナ ーー \201.300 


\3,.400x36 回 ボ ポ 2 万 6 回 

800| セ ッ ト 例 38 上 記 の セッ ト に NoI131 マ 
イコ ンティー チャ ー3 分 冊 を 加え た 場合 ・ 
Y250.800 月 々 \3.400X36 回 3 万 X6 回 


マイ コン ショ ッ プ ・ サ ン シ ャ イン 
8 月 28 日 堂々 OPEN// 


一 大 マイ コン セン ター が オー プ ブン し ます 。 そ の 名 も 
マイ コン ショ ッ フ ・ サ ン シ ャ イン 。 日 本 中 の 全 ソ フト を は じ め 、 豊 富 な 商品 構 
お 客 さ ま の ニー ズ に こと ご と く 応 えて いき ます 。 な お 、 
オー フン 記念 と し て 種々 の イベ ント を 用 意 し て ご 来店 を 、 お 待 し て お り ま す 。 


ピュ ー タ ー の ベ べ ベスト セラ ー 


マイ コン 操作 が 思い の まま 。 誰 で 
も 簡単 に 使い こなせ る よう に な る 
驚異 の オリ ジ ナ ル 学 習 ソ フト 、 
『 マ イコ ンティー チャ ー』 入 門 編 
(5 巻 ) プ レ ゼ ント 


し 標準 価格 Y 21.800 


マイ コン ティ ー チ ャ ー は 、BASIC を 自然 に 、 誰 
に で も 簡単 に マス ター で きる よう 、 音 と 画像 
て 解説 し ます 。 通 信教 育 ・ 講 習 会 は も ちろ ん 、 
製品 に つい て いる マニ ュ ア ル を 読む 必要 も 
あり ませ ん 。 ソ フト を テレ コ に 入れ る だ け で 、 そ 
の 日 か ら 簡 単に 使い こなせ る よう に な り ま す 。 


NEcP-880 1 


NEC PC-8801 セッ ト 例 一 3) 


本 体 十 PC-8801 用 漢字 ROM ボ ー ド 
十 カ ラー ディ スプ レイ 


No122| PC-8801 Y 228.000 
No1222 PC-880|-0| Y 38.000 
No1226 PC-8853 \215.000 
合計 標準 価格 \46 生 00 


\4.500 28 回 5 万 X8 回 

支 880|! セ ッ ト 例 32 上 記 の セッ ト に No1I34 マ 
イコ ンティー チャ ー3 分 冊 を 加え た 場合 ・ 

\ 530.500 月 々 \5.900X48 回 ボ 5 万 8 回 
基本 シス テム = 入門 シス テム に プリ ン 
ター を 追加 。18 ピ ン ヘ ッ ド て 漢字 も 鮮明 
に 印字 。 

| NEC PC-8801 セッ ト 例 一 


本 体 十 PC-8801 用 漢字 ROM ボ ー ド 十 
プリ ンタ ー+ プ リン ター 用 漢字 ROM ボ 
ー ド サカ ラー ディ スプ レイ 


No122! PC-8801 Y 228.000 
No 1222 PC-8801-01 \ 38.000 
No1230 PC-8822 Y 234.000 
No1226 PC-8853 Y215、000 
合計 標準 価格 エイ 600 
\5,.800 *28 回 8 万 ※8 回 


娘 8801 セ ッ ト 例 G3 上 記 の セッ ト に No1134 マ 
イコ ンティー チャ ー3 分 冊 を 加え た 場合 ・ 
\764.500 月 々 \7.100X48 回 お 8 万 X8 回 


ge 電話 1 本 クレ ジッ ト 、 頭 金 な し で 製品 先取 り ク 


9 月 17 日 より 全国 一 斉 受付 開始 雑誌 名 (マイ コン 入門 受付 開始 日 を 必ず 言っ て お 申込 みく だ さい 。 受 付 時 間 9 : 3020 : 00( 征 中 無体) 


札幌 (011)644-0375 仙台 (0222)21-3811 
静岡 (0542) 58-6611 
広島 (082)294-6402 岡山 (0862)25-2881 


な お 電話 が 大 変 こみ あう 場合 が あり ます 。 お 急ぎ の 方 は 下記 の 本 社 受付 本 部 に お 電話 くだ さい 。 お り 返 し お 電話 を さしあげ ます の で 通話 料 の ご 心配 は あり 
ませ ん 。 本 社 受付 本 部 03-983-1333 キ ャ ッ ト ジ ャ パン リミテッ ド 株 式 会 社 〒!70 東 京都 豊島 区 池袋 サン シャ イン 60・24F 


千葉 (0472) 25-2028 横浜 (045) 712-0402 


長野 (0262) 43-7812 新潟 (0252)31-6398 名 古屋 (052)264-4651 


松山 (0899)52-7600 福岡 (092)473-6690 


池袋 (03)983-1369 新宿 (03)375-1861 
京都 (075)255-4637 大 阪 (06)365-1706 


CaT 
Ji1 


すでに ご 注文 いた だ いて お り ま す 商 品 の お 届け 時 期 (納期 ) や 、 メ イン テ ナ ン ス その 他 の お 問い 合わ せ は 、 下 記 の テレ フォ ン サ ービス セン ター へ お 電話 くだ さい 。 
@ 札幌 (0」|)6|-848| @ 仙台 (0222)63-4964@ 東京 (03)983-1412 @ 名 古屋 (052)452-2481 @ 大 阪 (06)365-1705 @ 広島 (082)292-1380 @ 福岡 (092)473-5413 


お 支払 い 方 法 …… クレ ジッ ト の 月 々 の お 支払 い 、 ポ ボー ナス 時 払い は 、 
銀行 ・ 信 用 金庫 ・ 信 用 組合 ・ 農 協 等 の 金融 機関 (郵便 局 の 場合 は 郵便 振込 ) よ り ク レジ ッ ト 会 社 宛 に ご 送金 いた だ きま す 。 ④) 


銀行 口座 の ある 方 は 、 自 動 引 沙 。 


② 銀 行 口座 の な い 方 は 、 お 近く の 都市 銀行 ・ 地 方 
ニー ボ ー ナ ス 時 払い 金額 


最新 の 機能 へ 電 


EC 
PE-BBOI | 


事 


本 体 十 漢 字 ROM ボ ー ド 
十 モノクロ ディ スプ レイ 


合計 \324-800 


\3.590X35 回 ホ 4 万 X6 回 


本 体 十 漢字 ROM ボ ー ド 二 カ ラー ディスプレイ 


\3.700UX48 回 ホ 5 万 X8 回 


本 体 十 漢字 ROM ボ ー ド 
十 カ ラー ディ スプ レイ 十 漢字 プリ ンタ 


ベー に 
よく 分 る 実習 


マイ コン 技術 の 習得 は 、 


Prgp 
32K 本 体 二 な タ / 


カラ ー デ ィ ス プレ イ 二 デー タレ コー ダ 
@PC-800| (32K) \168.000 
@PC-8048K( ケ ー ブ ル 付 )…\ 69.660 
@PC-6082 


32K 本 体 † す カラ ー デ ィ ス プレ イ 
填 万 PSON プ リン タ 
@PC-800|1 (32K) 
@PC-8048K 

@MP80I 


\5.670X36 回 ポ 4 万 X6 回 


Ls] 

本 体 二 キャ ラク タ セ ッ ト ( 漢 字 ・ 非 漢字 ) 
グリ ー ン ディ スプ レイ 漢字 プリ ンタ 
@MB-25020 
@MB-22002, 22003 
@Logitec KI02A( ケ ー ブ ル 付 )\ 47.200 
@EPSON.MP80K( ヶ ケー ブル 付 )\193.900 

合計 \42 本 500 


\3.430X48 回 *5 万 X8 回 


請 一 本 で シス テム アッ プ 


NEC PC-6OOO。 シャ ー プ MZ- シ リー ズ 東芝 PASOPIA も 特価 発売 中 . ノ 


IU-BB1 用 ラリ ンタ 


NEC 久 PO-8822 \234-600 


\4 060X36 回 ポ ? 万 XB 回 
包 -BUH] 用 プリ ンタ 


EPSON@MP80 吊 \142-860 


\4.640Xg4 回 *] 万 X4 回 


EPSON@MP80IF/T…… \152-680 


\5.100XZ4 回 ポ 1 万 X4 回 


SEIKOSHA 久 GP20F ヶ - カ 人 )\ 96-500 


BDP-BUH] 用 テリ ンタ 


NEC@PC-602| (ケー ブル 付 ) \ 引 300 


学 3,040X80 回 


SEIKOSHA@GP-80P(7-7M 八 \76-560 
学 3,450X24 回 


還 商 品 は メー カー サー ビス て 安心 
罰 請 金 な し で 回 数 は 3 - 60 回 ま て 御 利用 出来 ます 
田 受 付 時 間 AM10 時 - PM7 時 まで 


人 SPA MZ-80B 用 プリ ンタ 
SEIKOSHA 俺 GP-80DB 


\4.500X12 回 8 万 X8 回 


人 Ap MZ.80K2E 用 プリ ンタ 
SEIKOSHA 例 GP-80D(NrEX) \ 94 生 990 


\4.200 X24 回 
個 有 衣 マ イク ロ 8 用 湊 字 プリ ンタ 


EPSON@MP-80K( ヶ ー プ ブル 人 ) \193-969 


\4.30UX35 回 1 万 X6 回 


全国 無料 配達 


コレ クト コー ル で 
( ぶ 、、 ど うそ 106) 


還 日 曜 ・ 祭 日 休み ポ は ボー ナス 時 加算 額 


* 3-B14-0931 


ピピ ormmnputer trearm 


株 式 会 社 サウ ン デ ックス 


〒|13 東京 都 文京 区 弥生 2-6-5 入 沢 ビ ル I03 号 TEL.03-8I4-093| (代表 ) 


圏 トー タル シス テム を 考え る 


真剣 に 学ぶ 


マイ コン 
技術 


位 ・ 平 易 な 指導 


- 般 に 、 


独学 や 通信 教育 で は 仲 々 困難 と 言 
われ て お り ま す が 、 そ の 点 本 校 で は 、 マ イコ ン 本 体 、 周 辺 機 器 等 を 


使っ て の 効果 的 な 実習 本 位 の 学習 と 、 平 易 な 指導 と に より 、 ほ ん と 


秋葉 原 駅 東 ロ 2 分 


き 


| | 
INScSsl 
] 


⑥ 短期 講座 ( 2 8 日 間 )、< く アセ ンプ ラン ベー シッ ク / デ ジタル 
イン ター フェ ー ス ノ 応 用 〉 各 コ ー ス も 随時 開講 し て いま す 。 


午前 の 部 AM9 :30 一 PM0 :30 
夜間 の 部 PM6 :20 一 PM 9 :10 
( 週 5 日 制 、 土 ・ 日 曜 休講 ) 


うに 短期 間 で 、 マ イコ ン が 自由 に 使い こなせ る よう 指導 し て お り . ま す 。 
マイ クロ コン ピュ ー タ 本 科 (3 ヶ 月 )・ マ イク ロコ ンピュータ 応用 科 (3 ヶ 月 ) 


ディ ジタル 技術 ・ マ イク ロコ ンピュータ の ハー ド ・ ソ フト 技術 の 入門 か ら 応 用 まで 


東京 トラ ンジ スタ 専門 学校 


入学 案内 は ハガキ | (〒101) 東京 都 千代 田 区 神田 佐久 間 町 3-37-23 電話 東京 (03)866-8979 代 
で ご 請求 下さ い 。 交通 至便 ・ 国 電 ・ 地 下 鉄 日 比 谷 線 と も 秋葉 原 駅 東口 下車 2 分 (由良 ビル 2F ) 


本 邦 随 一 ・ マ イコ ン 
本 格 的 技術 教育 校 
冷暖 房 完備 
学 生 寮 有 


14 年 間 の 実績 が 技術 力 の 高き を 証明 し ます 。 


学校 法人 ・ 情 oro っ MC 


アマ か ら フ プロ まで の 
甚 鞍 に 応え る 


ニュ ー タ ア 加 2 か 


旧 校 名 : 情報 処理 工学 院 


人 昼間 課程 


情報 処理 正 科 <wwms 


コン ピュ ー タ に 直接 関連 する プロ 
グラ ミン グ や ハー ドウ ェ ア の 知識 や 技 
術 は も ちろ ん 、 コ ンピュータ と 情報 処 
理 技術 を と り ま く 周 辺 科 学 に 関す る 
講座 も - 一 般 の 短大 ・ 大 学 の カリ キュ 
ラム 以上 に と り 入 れ 、 高度 な シス テム 
・ エ ン ジ ニア の 養成 を 目的 と し て 
ます : 2 年 間 で 、 コ ンピュータ の プ 宮 
グラ ム お よび シス テム に 初歩 
か ら 高 度 な 応用 np の 教育 を お ご 
な い タ の すべ て を "学び 
ます 。 全 員 が 第 2 種 情 隊 処 理 技 術 
者 認定 試験 合 属 を 日 標 と し 、) 第 1 種 
に つい て る も 合格 に 必要 な 教 迷 育 を す < ヽ 
て おこなっ て いま す 。 


1 


ジン ユーー 


@ コン ピュ ー タ ビジ ネス コー ス 


<2 年 制 女子 > 


オフ ィ ス ・ オ ー ト メー シ 
オフ ィ ス ・ コ ンピュータ の 激増 と と も に 、 
各 企 業 は その オペ レー タ を も と め て い 
ます 。 この コー ス は 、 この オフ ィ ス ・ コ ン 
ピュ ー タ の プロ グラ マ 兼 オペ レー タ を 
養成 する 情報 処理 正 科 の 選択 コー ス 
で す 。 コン ピュ ー タ の 初歩 か ら 簡 単 な 
プロ グラ ミン グ が で きる まで の 、 コ ン ピ 
ュー 4 に 関す る 基礎 を 学ぶ と と も に 、 

な 事務 に 必要 な さま ざま な 知識 と 
sa た め の カ リキ ュ ラ ム を 
追加 。 オフ ィ ス ・ コ ンピュータ が 扱え 、 
し か も -- 般 事務 に も 堪能 な 
リア ・ ウ ー マ ン の 養成 を めざし て いま す 


ョ ン 時 代 を 迎え 、 


新しい キャ 


借 夜 問 課程 


電算 学 学 科 <⑧ ヶ 月 か ら 2 年 間 まで * 男 女 〉 


マイ コン か ら 最 新鋭 大 型 コ ン ピ ュ 
ー タ まで を 使っ た 実習 中 心 の 総合 的 
な ソフ トウ ェ ア 教育 を 実施 、「 趣 味 の 
マイ コン 」 か ら 「 実 務 の シス テム 設計 」 

まで 、 幅 広い 期待 に 応え を て いま す . 
また 、 科 目 自 由 選 択 方 式 に より 、 自 避 
の ペー ス に 合っ た カリ キュ ラム が 可能 
で あり 、 少 人 数 制 と 合せ て より 高い 
教育 効果 を あげ て いま る す 。 大 学生 の 
教養 と し て 、 転 職 希 望 者 の 技術 教育 
と し て 、 ま た 社員 教育 と し て 広く 利用 
され て いま す 。 この 学科 は 、 江 用 コン 
ビ ピュー タコ ー ス と マイ クロ コジ ピュ ニタ 
コー ス か ら 成 り 、4 月 ・7 月 ・10 月 ・1 月 の 
いずれ の 時 期 か ら で も 入学 で きま す 


@ 汎用 コン ピュ ー タ コー ス 
プロ グラ ミン グ 言 語 を 中 心 に 、 基 
礎 か ら シ ステ ム 設計 ・ ・ 国 家 試 馬 傘 対 策 
まで 17 科 目 を 設置 、 汎 用 コン ピュ 
ー タ の 利用 技術 に 関す る 大 部 分 を 
徹 階 的 に 身 に つけ る こと が で きま す 。 
容 習 を 中 心 と し た 本 格 的 情報 処理 
本 教育 で 、 修 了 時 の 技術 力 は すぐ 
に 社会 で 通用 する 十分 高い も の と 
な っ て いま す 。 
@ マイ クロ コン ピュ ー タ コー ス 
入門 か ら 応 用 まで 、 マ イコ ン を 
事務 処理 に 
ラミ ング か ら シ ステ ム 設 計 ま で 4 科目 
を 設置 、 マ イコ ン の ビジ ネス ユー ス 
の た め の 本 格 コ ー ス で す 。 


利用 する た め の プ ログ 


情報 処理 特 科 ぐ 生 間 > 
5 の R 生 は コン ピュ ー タ 専門 校 
の 中 で も 、 他 に な い 4 年 制 の コー ス 
が 第 1 we 上 処 理 技術 者 認 人 定 
試験 の 全員 合格 を めざす と と も に 、 
コン ピュ ー タ を 中 心 と する 実務 的 な 
トー タル シス テム と 経営 管理 の 技法 
を 中 心 に 学び ます 。 コ ンピュータ の 技 
術 、 経 営 知識 、 判 断 、 そ し て 人 間 的 な 
面 で 人 前 の コン ピュ ー タ ・ プ ロフ ェ 
ッ シ ョ ナル に な っ て 卒業 で きる よう 、 
セミ ナー 的 な 授業 が お こ な わ れ ま す 。 
コン ピュ ー タ の 大 学院 、 あ る い は 企業 
の 幹部 養成 コー ス と いっ た と ころ で 、 
本 格 的 な コン ピュ ー タ ・ プ ロフ ェ ッ シ 
ョ ナル の 養成 を 目的 と し て いま す 。 


資 請求 方法] 
、 切 手 同 


入学 案内 を ご 希望 の 方 は 
封 の う 々 下記 まで お 申し 込み 下さ い 。 
夜間 課程 〒 切 手 150 円 
祖 問 課程 〒 切 手 600 円 


@ 大 阪 市 北 区 梅田 1-3-1 大 阪 駅 前 
第 一 ビル 11F 〒530 
容 06(341) 5550) 代 


コン ピュ ー タ 日 本 学院 事務 局 N 係 


ココ つ ビ ューZZ 四 二 写 時 


国家 試験 合格 全国 第 1 位 校 207 名 合格 
sg 寮 都 コン ピュ ー タ 有 ど 叶 


超大 型 コ ンピュータ に よる SS オン ライ ン 教 育 実 施 校 


TSS オ ン ラ イン ・ デ ー タ 通信 シス テム DIPS-1 DEMOS-E 200B 75 年 5 月 設置 | 


1980 年 6 月 超大 型 コ ンピュータ UINIVA こ 1100 /21 TSS オ ン ラ イン シス テム 超大 型 機 
1982 年 4 月 超大 型 コ ンピュータ UNIVA こ 1100/61 Mongugrd TSS シ ステ ム 一 設 置 校 


還 | 青 報 女 理 和 科 (全日 制 2 年 課程 高卒 男女 ) 
本 | 青 報 科 学科 (全日 制 3 年 課程 高卒 男女 ) 


中 型 以上 の コン ピュ ー タ を 学校 内 に 設置 し て いる 
CE99 宮 宣 2 コン ピュ ー タ 専門 学校 」 は 全国 で 数 校 し か あり ませ 
1 ん 。 関 西 で は 本 校 1 校 の み で す 。 
北 全 ? = 第 | 超大 型 コ ンピュータ (国内 で 使用 中 の コン ピュ ー タ 
ま 橋 委 き 。 メー で は 最大 級 ) に よる TS S オ ン ラ イン ・ デ ー タ 通信 シ 
に 衝 ま 全 入居 ステ ム を 学校 内 に 導入 設置 し て いる の は , 全国 で 本 校 
衝 月 ゞ IL K 交 の み で 
# 4 に 数 人 は 内 1 校 の 
を 証人 は 疫 | 請 報 処 理 技術 の 習得 に は 指導 教 
六 生 を ok 表 師 の 技術 水準 と 校内 設置 の 実習 
入 時 で る に | 設備 が も の を 言い ます 
用 本 校 が 京 大 ・ 東 大 ・ 阪 大 等 国立 大 学 の 情報 工学 科 
私 すま ・ 情 報 科学 科 を 規範 と し て , 高卒 生 に 情報 処理 技術 の 
専門 教育 が で きる の は ・ 教師 の 大 半 が 京 大 の 情報 工学 
iA さ ・ 情 報 科 学 関連 の 大 学院 出身 者 で あり 学校 内 に 大 弄 
本 校 胡 学 中 に 取得 し た 国家 試験 第 一 種 合格 証書 コン ピュ ー タ 他 27 機 種 が 実習 用 と し て 設置 され て いる 


か ら です 。 


csc Lt ("82.1.30 通 産 省 発表 ) 


1 で AP な - 
超大 型 コ ンピュータ UNIVAC 1100/21 TSS オ ン ラ イン シス テム 
前 年 に 引き 続き 昨年 度 も 第 1 種 情報 処理 技術 者 試験 (上 級 ) に 本 校 在学 生 が 合格 し まし た 。 在 学生 か ら 
第 1 種 国家 試験 合格 者 が 出る こと は , 本 校 の 専門 技術 教育 の 水準 が 大 学 で の 情報 処理 技術 専門 課程 に 匹 
敵 す る も の で ある こと を 示し て いま す 。 本校 は 大 学 へ 進学 せ ず に 上 級 技術 者 と し て 活躍 を 望む 高卒 生 の 
だ め の コ ンピュータ 専門 学校 で す 
毎年 在学 生 が 多数 合格 し て 本 校 が 「 国 家 試 験 合格 実績 最 優秀 校 」 と な っ た 要因 の 1 つ に , 本 校 独 特 の 
コン ピュ ー タ 自由 実習 制度 が あり ます 。 
本 校生 で あれ ば 誰 で も , 自由 に , 自分 で コン ピュ ー タ を 操作 で きま す 


一 要 項 耶 共 600 円 請求 先 京都 コン ピュ ー タ 学院 入学 係 


亜 606 京都 市 左京 区 下鴨 本 町 17 TEL (075)711 一 0161O 


「 ご き な /)」 と 多 げ る の か 、 


「 人 やつ で みよ づ 」 


、 パッ ケー ジ で す 氏名 、 


ご 和 葉 り 出 す の か 。 


隊 林 cxozc ーー 


に eri 更 間 NO す た め の コー ス で す 。 
@ 初級 
@ 中 紋 
@ 上 紋 


応用 コー ズ ス | 」 ン ヒア ー タ の アウ トラ イン を つか ん だ か に 


コン ピュ ー タ を この よう に 利用 する の が 、 そ の 目的 に あっ た カリ 
キュ ラム が 組ま れ て いま す 。 

@ ブロ グラ ミン グ 修 得 コー ス 

@ ライ ブラ リー 利用 コー ス 


画 マイ クロ プロ ン ソン フン トウェア ファ ミリ ー 教室 
マイ コン を 選び ませ ん 。 言語 も 不要 で す 。 操作 一 つて 、 あな た は 実務 家 。 
いま 、 世界 で ナン バー ワン の 実績 を 誇る ビジ ネス [ 向 け ソ フト ウェ ア シス テム 。 
(MroPro) フ ァ ミ リー の 教育 を 、 ウ チ ダ ・ マ イコ ン ・ ス クー ル で は 全国 40 数 筒 所 の 
チェ ー ン 教室 を 通じ て 開催 し て まい り ま す 。( コ ンピュータ ー の 知識 は 必要 と し ませ ん 。) 
@CalcStaF ド (カル クス ター) 

子 算 や 販売 予測 等 の 数 値 計算 を 主体 と する 業務 用 パッ ケー ジ で す 。 シミ ュ レ ー 
ショ ン を 好き な 数 値 に 置き 換え 、CRT 上 に 表示 し ます 。 

「 若 し 、 こ う 変 化し た ら 」 方 式 が 有効 に 活用 出来 ます 。 
@ DataSiaF (デー タス ター) 

住所 録 、 在庫 、 購入 り ス ト の 検索 等 、 特定 書式 の 記入 を し 、 そ れ を 経済 的 に 追 
求 す る 為 の パッ ケー ジ で す 。 現在 ご 利用 の フォ ー ム その まま に 帳票 を 作成 し 、 財 
務 会 計 、 資材 管理 、 生産 管理 に 適用 が 可能 な 検索 ・ 更 新 シ ステ ム の 構築 に ご 利 
用 頂け ます 。 

@SuperSoPf (スー パー ソー ト ) 

上記 の CalcStaF 政 に は DataStaF と 共存 し て 利用 が 計ら れる 分 類 集計 用 の 
住所 、 性 別 、 年 収 と いっ た 項目 を 最大 32 個 の 指定 可能 
に て 分 類 集計 し て くれ る 機能 を 発揮 し ます 。 


顧問 、 講師 に は コン ピュ ー タ 界 の 第 一 人 者 を 
@ 顧 問 : 相 磯 秀夫 慶応 大 学 工学 部 教授 


石田 晴久 東京 大 学 理学 部 教授 
黒川 順 ニ 日 本 ビジ ネス ショ ウ 委員 長 
堺屋 太一 


全国 の チェ ー ン 教室 


田 札 幌 岩崎 教室 〒060 札幌 市 中 央 区 北 4 条 西 5 丁目 岩崎 ビル 3F 01I-22|1-616I 
田 会 津 若松 教室 〒965 会 津 若松 市 西 七 日 町 8 番 20 号 0242-22-444| 
田山 形 教室 〒990-22 山形 市 流通 セン ター|-9-2 オビ サン (株 ) 内 0236-33-3250 
浦 和 教 室 〒336 浦和 市 仲町 |-1|-9 白壁 家 ビ ル 2 階 0488-24-2715 
圏 池 袋 教室 〒!7! 東京 都 豊島 区 南 池袋 2-23-4 富沢 ビル 3F 03-984-105! 
田 麹 町 教室 〒|02 東京 都 千 代田 区 麹町 3-3 ニュ ー ベ ルモード ビル 3F 03-263-7451 
国 銀 座 教 室 〒!04 東京 都 中 央 区 銀座 4-9-!3 国土 館 ビ ル 9F 03-54|-|481 
圏 大 森 教 室 
田 横 浜 西口 教室 〒220 横浜 市 西区 南幸 町 2-9-19 松本 ビル 601 号 045-314-6201 
圏 沼津 教室 〒410 沼津 市 城内 字 町 方 町 8-| 0559-62-0864 

画 三 鳥 教室 〒4!| 静岡 県 三島 市 一 番 町 15 番 32 号 族 沢 ビル 2F 0559-72-8872 
較 浜 松 駅 南 教室 〒432 浜松 市 海老 塚 !-10-4 第 5 清川 ビル 0534-53-315| 
画 金 沢 教 定 〒92! 金沢 市 泉野 出町 4-!-16 野村 ビル 2F 0762-47-5107 

圏 長野 教室 〒380 長野 市 問 御所 町 1217 0262-28-7088 

一 千種 教室 〒464 名 古屋 市 千種 区 松 軒 |-7-!5 大 和 ビ ピル 3F 052-722-0687 
八 事 教室 〒468 名 古屋 市 天白 区 表 山 |-118 052-834-0355 

画 半 田 教 室 〒475 半田 市 宮路 町 15」-24 住吉 駅 前 ピル 3F 0569-22-9I60 

田 四 日 市 教室 〒5!0 四日市 市 ん の 城 町 4-20( 理 工 産業 内 ) 0593-5|-I651 

田 津 教室 〒5!4 津 市 本 町 23-!7( 理 工 産 業 内 ) 0592-25-6251 

田 松 阪 教 室 〒5!5 松阪 市 船 江 町 785( 太 陽 商事 内 ) 0598-51-4312 

較 福 井 教 室 〒910 福井 市 毛 矢 3 丁目 2-!| 0776-36-5871 


〒143 東京 都 大 田 区 大 森北 |-18-14 東亜 興産 大 森 ビ ル 6F 03-762-8314 


田 岐 邊 教 室 〒500 岐阜 市 加納 清水 町 2-||-3 常 川 ビ ル |、2F 0582-73-5891 

田 伏 見 稲荷 教室 〒6I2 京都 市 伏見 区 深草 一 ノ 坪 町 29 伏見 稲荷 駅 前 075-641-4397 
画 泉 大 津 教 室 〒595 泉大津 市 北 豊 中 町 2-12-| 0725-23-0610 

田 梅 田 教室 〒530 大 阪 市 北 区 梅田 | 丁目 2-2 大 阪 駅 前 第 2 ビル 1104 06-345-211I 
圏 大 阪本 町 教室 〒54i 大 阪 市 東 区 南 久太郎 町 !-30 大 成 ビ ル IF 06-26|I-579| 
圏 堺東 教室 〒590 堺 市 北花田 口 町 3 丁目 |-15 東洋 ビル 内 4F 0722-23-5266 

較 京 橋 教 室 〒534 大 阪 市 都島 区 片町 2 丁目 2 番 40 号 大 発 ビ ル 2F 06-357-1I50 
画 日 本 橋 教 室 〒556 大 阪 市 浪速 区 日 本 橋 5-5-20 06-64|-4188 

田 兵 庫 教 室 〒652 神戸 市 兵庫 区 羽 坂 通 3 丁目 4-!| 078-577-3435 

田 和 歌 山 教 室 〒640 和歌 山 市 九 番 丁 |2 番 地 の 8 九 番 丁 ビル 4F 0734-32-3779 
画 広 島 教 室 〒733 広島 市 中 区 堺 町 2-6-15 0822-93-8606 

一 大 分 教室 〒870 大 分 市 中 央 町 | 丁目 5 番 27 号 安部 ビル 4F 0975-37-3188 
佐 世 保 教 室 〒857 佐世保 市 相生 町 2-29 0956-24-3398 


ウチ ンタ マン フレ ンス フー/ と 


〒104 東京 都 中 央 区 銀座 4 一 9 一 13 国 土 館 ビル 9F 
TEL (03) 545 一 2841( 代 表 ) 


マイ コン を お いし くい た 


こく 方 法 。 


食べ ず 嫌 い は この 際 や め に し て 、 コ ンピュータ ー い か に お いし く 料 理 す る こと を 考え て みて 
《 だ さい 。 素 材 を その まま シン プル に 調理 する か 、 アプ リケーション で 少し ば か り 味 付け し て 味 わ 


うか お 好み 次 第 。 も ちろ ん ゲー ム 、 ビ ジネス と 料理 方 法 $ お 
お っ し ゃ る 方 マイ コン の グッ レマン (美食 家 ) コン ピュ ー タ ー 


好み し だ い 。 料理 : 法 も わか ら な い 、 と 
ラン ド 大 阪 に いら し て くだ さい 。 ひ と つ 私 達 


と いっ し ょ に 、 マ イコ ン を いか に お いし くい だ だ く か 話し 合っ つて み ませ ん か >。 


店 曲目 四 


0 
ん で 


HIROSHIMA 


Intcr 


feC と 


〈 応 用 例 1 〉 デ ー タ 放送 イン テリ ジェ ント 端末 と し て の 使用 例 


デー タ 送 信 端 末 1200 ボ ー 


1200 ボ ー 


デー タ 受 信 端 末 
(パソ コン ) 

1200 ボ ポー | デー タ 受 信 端 末 
ーーーー (パン ソコン) 

営業 所 又は 監視 所 


e 事務 処理 シス テム @ コ ンピュータ ネッ トワ ー ク 
e 計 測 制御 シス テム パソ コン 教室 
@ ホー ム エ レ クト ロニ クス 


意欲 の ある 方 を 求め て お り ます / 
お 問合せ は 一 TEL (082) 249-3950 
総務 課 森本 まで 


(パソ コン ) 


デー タ 送 信 端 末 
(パソ コン ) 
現 場 


1200 ボ ー 


ee ) 


が 


還 取 扱い 製品 / 全 メー カー 

圏 ソリ フト / ゲー ム か ら ビ ジネス 用 まで 

還 ロ ー ン 取扱 い 中 。 お 気軽 に ご 相談 くだ さい 。 
還 営 業 時 間 / AM10:00--PM7:00 

軒 定 休日 / 毎 週 木曜 日 


ComputertLong O5RRR 
(株 ) コ ンピュータ ー ラ ンド 大 阪 


@556 @ 大 阪 市 浪速 区 日 本 橋 5 丁 目 7-11 エ ビス ビル 2F 
@ PHONE 06(644)5388 @ 地 下 鉄 恵 美 須 北 出口 南 へ 1 分 


ーー ドブ 
ロー カレ ネッ トワ ー ク 例 紹 介 
当社 は か ね て か ら コ ンピュータ ネッ トワ ー ク の 研究 開発 に 
取組 ん で き て お り ま す が 、 実際 の 応用 例 が 数 シス テム 完 
成 し て おり ます 。 
応用 例 』 〉 工 程 表 示 イ ン テ リ ジェ ント 端末 と し て の 使用 例 


部 品 展 開 情報 1 
工程 表示 端末 (パソ コン ) 
EE 


ホス ト 

コン ピュ が 
(パソ コン ) 
部 品 展開 


| 部品 展 開 情報 
工程 表示 端末 (パソ コン ) 


| 部 品 展開 情報 四 
工程 表示 端末 (パソ コン ) 


e 特 別 教室 : 1 ヶ 月 間 の 特記 コー ス 、10 名 限定 、20 万 円 ノ 1 名 
e 出 天才 室 : 講師 派遣 料 人 万 円 1 日 

(交通 費 、 宿 泊 費 、 テ キス ト 代 列 ) 
e 一 般 救 室 : 初心 者 コー スカ ら 応用 コー ス まで 6 段階 


確か な 技術 で 創造 する 


人 ダ %( 株 インタフェース 


バッ ズ 

e 本 社 〒730 広島 市 中 区 宝町 4-1 (宝町 小川 ビル ) 
TEL (082) 249-0794 

e 松山 支店 プ 〒790 松山 市 一 番 町 1-15-2 (住友 生命 松山 ビル ) 
TEL (0899) 32-0051 


いま 大 好評 わか る 4S7C の 入 門 書 


BASIC で 広がる 世界 


@ 柏 木 恭 忠 著 
信 定 価 1500 円 


wa BAGIC で 広がる 世界 


人 @ 柏 木 恭 忠 著 
@ 定 価 1600 円 


BASIC の 初歩 か ら 応 用 ま 
で を 本 女 2 色刷 で 解説 し た 


入門 者 の た め の 決 定 版 で す . 


BASIC っ て 何 ? 最小 限 知 
っ て 欲し いこ と ググ BASIC の 
基本 命令 語 プ BASIC で 書い 
だ ゲ が ー エ スム と フン で スリ ルレ た で 記 ウ % 
イ 双 六 , 反転 , ナイ ン 他 ) 


BASIC の 女 法 を 覚え だ 人 
が 。 実務 の プロ グラ ム を 作 
れる よう に 段階 的 に 解説 
デー タ 読 み 込み (入力 ) の 基 
礎 / 書 き 出し (出力 ) の 基礎 / 
処理 ・ 計 算 の 基礎 / 基 礎 手 法 
の 活用 / デ ィ ス ク の 活用 / 修 
了 課 題 プ ロク ラム 


BASIC な BASIC 


@ 柏 木 恭 忠 著 
久 定 価 600 円 


“BASIC で 広がる 世界 "を 
読む 前 の 必読 の 書 で す . 
BASIC 言語 の 使い 方 を 平 
易 に 解説 し て あり ます . 
スタ ー ト まで て で て の 準備 数 値 
の 計算 ププ ログラム 作 成 と 
実行 の 基本 事項 BASIC 文 
の 書き 方 他 


POP BASIC ①-⑧ 


人 @ 柏 木 研究 所 編 
久 定 価 各 巻 800 円 


GO 出 了 桂 


東京 都 豊島 区 巣鴨 1-14-2 傘 (03)947-6311 


run BASIC 


人 @ 了 策 村 建 夫 著 


基本 言語 の 習得 か ら 。 実 ) 
@ 定 価 1300 円 8 2 


プロ グラ ム 作 成 を 目指 し た 
初心 者 の た め の 入 門 書 で す . 
プラ ウン 管 の 画面 に 婦 字 を 
出す グ 数 と 計算 判断 の 働 
き グ プロ グラ ム の 直し 方 
凛 字 列 を あつ か う 他 


これ か ら の BASIC 活 用 法 


人 @ 猪 飼 國 夫 編 
久 定 価 1400 円 


事務 処理 や 外部 信号 源 と の 
接続 と いっ た 実用 性 を ベー 
ス 代 だ や イコ シン 門 書 、 
血 近 な わっ だ コシ ピュ ー ダ ア 
BASIG: プ 店 グラ ミミ ング: だ : 画 
面 を 作る プ デ ー タ の 入力 と 
加工 ・ 保 存 プ マイ コン と 1/ 
O プ マイ コン に よる 制御 


新 ツ マイ コン BAGIC 規 栓 表 


人 @ 中 村人 衝 束 編 


@ 定 価 900 円 BASIC 言語 は 標準 規格 化 


され て いま せん . 各社 各種 
の BASIC の “比較 表 " で す . 
基本 事項 編集 ・ デ バッ グ ・ 
プロ グラ ム 制 御 入 出力 , 
フッ アゴ イ 9 レブ プル エガ ァ 
サブ プ ブルー チ ン ・ 割 込み グ 関 
数 ・ 定 義 ・ 機 械 語 他 


分 骨 ・ 


BASIC を 使っ な た プログ ラム 集 で す . 
種 に より BASIC は 多少 異な り ま す が , 本 書 は 各 機 種 に 
共通 する 命令 を 使用 し て いる の で , どの マイ コン に も 適 
用 で きま す . 各巻 と も BASIC 問題 集 、 BASIC ゲー ム 
等 で 構成 され て いま す . 

秦 BASIC 問題 集 BASIC 初心 者 が 容易 に 理解 で きる よ 
うに 問題 を 配列 し , 標準 言語 で 出題 , 解答 つき . 

秦 BASIC ゲー ム ジャ ン ケ ン ポ ング 宝 さ が し 2- 山 < 
ず し グ 奇 数 山 く ず し ノ 追 跡 ゲ ー ム オセ ロ ゲ ー ム グ ハ 
ノイ の 塔 プ HT & BLOW ン 8-GAME プ QUEEN プ た て よこ 
ン 9 個 の 石 プ OWARE グ BLACK BOX 他 

補 あ な た は BASIC の スー パー マン BASIC プロ グラ 
ム 作 成 の 考え 方 を 実例 を 上 げ て 解説 し て あり ます . 

究 BASIC ライ ブラ リー その まま 活用 で きま す . 
整数 の 素因 数 分 解 基 礎 統 計量 代数 方 程 式 の 根 プ 連 
立 1 次 方 程 式 の 根 ン 整数 の 変換 SORT 他 


コン ピュ ー タ の 機 


振替 東京 0-10665 


近刊 


sz マイ コン 書籍 ・ 雑 誌 コ ー ナ ー 


9 
マイ クロ コン ビ ピュー タ 用 語 
矢田 光治 著 3800 語 を を 解説 し た 本 格 的 辞典 新書 ・3400 円 
M シ リー ズ W 


バン コン プロ グラ Ko 


や さる し いも の か ' ら 護 【 に まとめ が た BS、3 1600F3 


PC8000 シ リー ズ 6 
パン コン プロ グラ ミン グ 500 顕 


田中 廣 著 部 分 修正 で 他 機 種 に 使用 可能 B 5 ・|I600 円 


マイ コン プロ グラ ミン グ 500 題 
田中 廣 著 や さ し い 6$ 5 の か ら 抽 階 TO に 記述 A5・1600 円 
ゎ か りや すい プロ グラ ミン グ 入 門 
的 場 裕司 著 機械 語 と し べ ル ん に よる 記述 法 A 5 ・2200 円 


誰 に で も 使え る ーー 日 A ら ト C 火 門 


近藤 貞雄 著 1 項目 外 に その 場 で に つく B 5 ・!600 円 


マイ クロ コン ピュ ー タ の 基礎 
8080 系 、 Z80 系 、 6800 系 
志水 英 三 監修 マイ ュ ン の 基礎 教育 用 テキ スト A 5 ・3000 円 


マイ コン プロ グラ ミン グ の 基礎 


成田 裕一 ・ 玉 本 英夫 著 A 5 ・I600 円 
ビジ ネス マン の た め の ノン コン 独 習 術 


杉田 稔 ・ 杉田 耕造 著 人 A5・1!600 円 


日 刊 工業 新聞 社 s 計 1 振 符 東京 9 186076 


汗 較 中 ファ カゴ カ OT 


ーー 


. | 言 ( 重 洋 剛 ) フ ァ カ ゴ カ OT 


員 


orriWcHNI 


・ 〇 の ーー の PO(TVL へ 4 
= 周 WSr 秋 軍 難 


叶 フ ち ゴ OOT 
病 較 ファ カゴ カ OT ヽ 
床 
さ 朋 佑 電 【 
『 9! 
ョ アア 


| 言 瞳 信 ③ 六 章 活 上 


| 寺 遇 
| 言い 
書 


、 時 
5 


) ら の 取 MM 
円 円 円 ココ 共 和 〒 共 
各 〒 250 250 著 25 衝 著 250 著 


250 著 
人 都 千 代田 区 飯田 橋 3- 7- 
パ リー ネ -. 東京 (03) 261-0 7 6 < 
拓 禁 東 京 3-164767 


ん ULTII6 


色刷 を &g5 入門 テキ スト シリ ー ズ ググ 


ノン プロ グラ ミン グ 言 語 


Multiplan 入 門 


定価 2.500 円 ・〒250 


AP-1 8 は ク 入 門 


征 価 1.500 円 ・〒250 


BASIC 人 入門 コン ピュ ー タ 人 門 


征 価 1.800 円 ・〒250 征 価 1.500 円 ・〒250 


BASIC 初 級 . COBOL 和 門 


征 価 2.000 円 | 定価 2.500 円 ・〒250 


BASIC 中 級 FORTRANA 門 


曲 2.500 円 ・〒250 定価 2.000 円 ・〒250 
電 eo 〒160 東京 都 新宿 西新 宿 /-7-30 
門 電子 開発 学園 合 03(371)1388 小田 急 柏木 ビル 
発 ax 二 107 東京 者 港 区 赤坂 1-11-41 
先 技 報 堂 出 版 合 03(585)0166 第 1 興和 ビル 


2 を ぁ る ロ A ら 1C じ サブ ルー チン 集 
科学 計算 用 の サブ ルー チン ・ バ ッ ケ ー ジ , 学生 ・ 科 学 技術 者 向 .” 
ッ ク デュ ッ シ ェ ル / 計 語 ・ 長谷 川 他 訳 

巻 =2,900 円 2 巻 =10 月 発行 


1 


マイ コン に よる BASIC 入 門 
“パソ コン を 手 に 入れ た ら 何 を させ る か ? その 答 が この 本 " 
ドゥ ワイ ヤ ・ ク リッ チ フ ィ ー ル ド / 山 下 ・ 石 川 訳 
入門 コー ス 2,700 円 活用 コー ス 2,900 円 


マネ ミッ 教 室 入門 BASIC 


"中 学年 生 程度 の 数 学 で BASIC ブ ログ ラミ ング 技術 が 身 に つく " 
ペッ カム / 庄 司 他 訳 2,700 円 


6 た ぁ ゥ BASIC プロ グラ ミン グ 


“デー タ 処 理 の 技術 と その 関連 する 数 学 ・ 物 理学 etc の 演習 問題 " 
ヒュ ー ビ ン / 径 名 訳 予価 2,900 円 


タタ * 


数 学 と コン ピュ の 
ASIC 数 学 リー ディ ング ス の 月 刊 


毎月 10 日 発売 定価 250 円 


現代 数 学科 0722 者 1 10144 


新刊 ・ 近 刊 
ググ ワウ 


(《 コ ンピュータ ー サイ エン ス ・ ラ イブ ラリ ー》〉 


〇 _ 言語 と プロ グラ ミン グ 


米田 信夫 編 1900 円 


ロロ し L/M プク グ 負 コ ン ビ ピュ 5 で ッッ 


グロ グラ ミン グ 
D.D. マ クラ ッ ケ ン 著 石田 晴久 監訳 
馬 ASIC に よる 

クタ さき 
細井 勉 ・ 島 田 君 枝 著 
mASCAL に よる 

プ 折 グラ ミン グ 入 門 
細井 勉 ・ 島 田 君 枝 著 1800 円 


映像 ルポ ボ ・ マ イコ ン 


石川 千秋 編 予価 1400 円 


⑤② 産業 図書 


3100 円 


ング 人 門 


1800 円 


千代 田 区 飯田 橋 一 11 一 3 
電話 03 一 261 一 7821( 代 ) 


@PC8000 シ リー ズ に よる 実例 で 絵 と き 解説 する .2 


図解 パリ コン の 使い 万 


プロ グラ ミン グ と ファ イル 編成 


東海 大 学 大 原 茂 之 
ド バ ン ス ト エ レク トロ ニー クス 幌 田 了 ー 共著 
内 ソー ド 電 算 機 シス テム 新井 隆司 


本 書 は , 初め て パソ コン を 扱う 人 の た め に , 
で さま ざま な 事務 処理 を 行う うそ で の 基本 事項 を , PC 
8001 に よる 豊富 な 実例 を も と に , 絵 と き で わか りや すく 
解説 し た も の で す . (A5 判 176 頁 定価 1500 円 〒250) 


に マ 2 還 証 間 較 
記 2 3 
ビク クロ FAB 串 

コ ラロ B 日 ンス きす 

さ の | 邊 | 
タン ミコ | A つた * | 
英 モン ン に A ] めこ 靖 座 
和 エ クビ | つ S|12 7 較 軸 
向 2 朱 に 馬 を ァ ゲ 
疾 の | 0 | 通詞 | 
通 記 タン C| の ) と 男 
典 入 の | 演 > ム 
5 | 習 = 了 上 衝 大 
Et ネ ? 際 
ミ 人 きき | *82 し り 2 較 識 
タッ 晴 ョ | 方 習 
クタ 明 良 ン レ 
編 徐 編 子 訳 ス 
wa i 議 
7 5 2 6 藤 4 メ | 3 田 8 に 
9 9 ? |9 を 8 シ |6 攻 0 較 
円 円 円 円 編 円 編 | 円 著 円 


112 東京 都 文京 区 小日向 4 一 6 一 19 
電話 03(947 )2511 プ 振替 東京 1-57035 


共立 出 


@ 一般 技術 者 や 経営 者 の た め に マイ コン を 解説 ./ 


な i マ イコ ン “⑳893 


・ 使 い 方 
東海 大 学 助教 授 大 條 廣 共著 

東海 大 学 吹 浦 折 教 " 
本 書 は , 容易 に マイ コン を 理解 し , 利用 で きる Ne Ne 
の ) う 2 ウェ アニ ソン ブフ ト 、 テ ア の 考え 方 。 及び 
プロ セン サレ ベル の 応用 の 仕方 を 平易 に 解説 し た 入門 書 


で 5 


(A5 判 206 頁 定価 1700 円 〒250) 


バ パー ソナ ルコ ン ビ ュー タ の だ め の 


実用 BASIC プ ログ ラミ ング 


BASIC の 作り 方 と その 具体 的 処理 方 法 を 平易 に 解説 する . 
安田 永 著 !80 頁 定価 2200 円 250 


較 解 初め て マイ コン 鐘 訟 


基礎 的 事項 を 中 心 に , ・ イ ラス ト を 豊富 に 用 いて 解説. 
鎌田 信夫 野島 晋 監修 !76 頁 定価 !400 円 〒250 


バー ツナ ルコ ンピュータ の だ め の 


CPM 入門 


オペ レー ショ ン の 方 法 ひ すら ハー ドウ エア の 構成 方 法 まで . 
福田 譲治 西岡 久雄 共著 228 真 定価 2000 円 〒250 


I0| 東京 都 千 代田 区 神田 錦町 3 の | 振替 東京 6-20018 谷 03-233-0641⑯ 


解 zgg BASIC 和 人 前 


の だ め の 


豊富 な 例題 で , 実際 に プロ グラ ム 技 術 を 会 得 で きる . 
小牧 常松 大原 茂之 共著 !80 真 定価 !500 円 〒250 


近刊 


別 工 サイ エン 


No54 


- 辺 便 の 時 代 は 終わ っ た / 
ビュ ー タ ー 


BASIC 


特集 パー ソナ ルコ ン 


進化 する リフ トウ ェ ア 


石田 晴久 編 ‥……… 絶 替 発売 中 ・1500 円 300 
本 書 は 、 ユ ー ザ ー が パー ソナ ルコ ンピュータ ー を 使う 
上 で 、 も っ と も 重要 と 思わ れる ソフ トウ ェ 了 の 間 題 を 
中 心 に 、 大型 計 算 機 と の 連携 な ど 、 パ パソ コン が 開く 新 
し い 世 界 を 豊富 な 写真 と 図版 を まじ えて 紹介 し ます 


本 書 の 主 な 内 容 … cs まがい > グ 9 ピュ 
ー タ ー と 音楽 デ ー タ ・ ベ ー ス 倫 0S と ソフ ト 開 発 環 


FRA で Micro Prolog 倫 日 本 語 ワ ー ド 
プロ セッ サ 鍛 ロー カル ネッ トワ ー ク と デー タ 通 信 食え ス 
ーー パー ・ パ ー ジ ナル コン ゼ ュ ーー ター 

発行 = 日 経 サイ エン スプ 発売 = 日 本 経済 新聞 社 
〒〒!00 東京 都 千代 田 区 大 手 町 |-9-5 振替 東京 | 134267 


トバ ツッコ ン 3 ン ポ 時 代 を 先取 りす る / 
る き Y 


本 体 、 周 辺 機器 84 種 に ソフ 
トウ エア 340 本 を 掲載 カ 
タロ グ ・ み イド の 決定 版 


っ AS/ て 


監修 渡辺 茂 ( hil 
| 240)0 円 


別 民 
ーー コン ピュ ー ト ピア 


コン ピュ ー タ 事典 


南 人 保坂 海老 沢 寺 NO 


礁 知識 を 平易 に 解 
説 し た 決定 版 。 


オフ ィ ス ・ オ ー ト メー ショ ン 
0 4 の 反 さ で ある 旧 聞 導 か ら 解 き 小玉 
ほ 入 の 迷路 を 解明 する 。 定価 1500 円 


03(581)5201 


ンー ン 書籍 ・ 雑 誌 コ ー ナ ー 


マイ コン と パズル = 


界 BASIC プ ログ ラミ ンク 
頭 の 体操 


支 小 谷 善 行 著 B6 判 ・ 定 価 980 幅 


w パ 【 3 
バ パソ コン 
トレ ー ニ ング 
や さ し い 実用 ソフ ト の 作り 方 》 
沙 村 際 嗣 ・ 柳 田 弘 道 共 着 
B6 判 ・ 定 価 980 円 


マイ コン 用 給 毛 典 7 sBASIC 演 習 
日 本 守 所 編著 定価 1500 円 内 田 一 上 床 井 委 治 0 


図 解 人 リン 人 門 ツル E テ 0 個 廊 


飼 國 夫 著 定価 1300 円 文 石田 晴久 著 定価 1500 円 


CP M の 使 /) 方 5 7H グ の 作詞 


石田 芳 編著 定価 2000 円 衣 大 川 善 邦 著 "定価 1500 円 


東京 都 至 東 区 東上 上野 4-25-18 谷 03(842)0511 人 ⑩ 振 森 東 京 ]-58204 


BE ユニ ックス ・ コ ミュ ニテ ィ ・ シ リー ズ 第 1 弾 


Ge が MV 


ラー 国井 利 泰 AB 判 200 頁 
白田 由香 利 定価 1.500 円 


生生 
テク ノコ レポ ンプ ブッ クス シリ ー ズ ② 
シャ ー プ PC-1500 (人 誠 間 題 : 融 問 あ ー ド 侍 ) 
に ・】 や 
ボケ コン マス ター ドリ ル 
白 柳 伊 佐 雄 著 B5 判 。 200 頁 
ーー ザー 定価 1.980 円 
大 好評 発売 中 / コレ ポン プッ クス シリ ー ズ (1 
い ・】 や 
バハ ンコ ンマ スタ ー ド リル 
渡辺 茂 監修 B5 判 240 頁 定価 1.980 円 


5 
ーー 隊 
社 * 208-6391 


〒160 東京 都 新宿 区 新宿 5-17-11 白鳳 ビル 


多 直 ち に 役立つ 入門 か ら 中 級 ま で ./ 
三菱 総 研 藤井 邦彦 の 好評 シリ ー ズ 


BASIC プ ログ ラミ ング (1 )if800 
B5・296  Y\2.800 
F-BASIC プ ログ ラミ ング 
MICRO-8 B5・404  Y\2.900 
T-BASIC プ ログ ラミ ング 
PASOPIA B5・392  Y\2.900 
ビジ ネス BASIC 徹 底 実 習 N-BASIC 
谷口 公 三 著 B5・240  \2.500 
マイ コン グラ フィ ックス 入門 
矢 知 晴 一 郎 著 B5・170  Y\2.000 
マイ クロ コン ピュ ー タ に よる 
BASIC 


古 質 義 豪 著 A5 ・208 \1.800 
記 る 4 で 〒102 東京 都 千 代田 区 三 番 町 5 
工学 図書 帳 TEL (03)262-3772 


プレ イマ イコ ン 2 えー 
1.BASIC 


刀根 薫 著 B5 判 ・256 頁 定価 2500 円 
BASIC 文法 を 始め 数 論 ・ 数 値 解析 ・ 統 計 解 析 ・ 
2 ら 基 本 的 で 楽し い 例題 分 析 ・ プ ログ ラム 作成 迄 を 詳 ラム に よる 有限 要素 解析 プロ グラ 


プロ グラ ムカ セッ ト PC8001 用 


2 統計 解析 


古林 隆 著 B5 判 ・240 真 定価 3200 円 


統計 解析 の 基礎 と し て 、 確 率 分 布 や 推測 統計 学 の 考え 方 を 分 り 易 
基本 的 な 統計 解析 手法 が マイ コン で 利用 で 


シン ググ 


解説 する と と も に 、 
きる よう に BASIC に よる プロ グラ ム も 掲載 。 


9: プー ビ ンジ 


6502 編 
中 西 正和 著 B5 判 ・192 頁 定価 2700 円 


マイ コン 内 で 最大 機能 を 発揮 きせ る の に 必要 な アセ ンプ ブリ 言 


つい て , 例題 を 中 心 に 丁寧 に 解説 。 


5 マイ コン 書籍 雑誌 コー ナー 


OR・ デ ー タ 処理 


各 定価 16000 円 


ブリ ・ プ ログ ラ 


あな た な ら わ か る 


較 猪 ツイ コン 大 


吉本 久 泰 著 定 価 13OO 円 
マイ コン と 聞い た だ け で アレ ルギー を お こす 
人 々 の た め に , ハー ド の 理解 に 重点 を お いた 
近刊 
BASIC を 知っ て いる だ け で は プロ グラ ム は 作れ な い 
ビジ ネス マン の た め の 
い 】 w に 
の こま (のり 
2 o ※ーーS <、 NN 
ング テー ポン マン 
東洋 情報 シス テム マイ コン クラ ブ 編  B5 予価 1800 円 
実例 に よる 


若山 芳 2 BS5 予価 1800 円 


東京 電機 大 学 出版 局 


〒〒I0| 東京 都 千代 田 区 神田 錦町 2-2 TEL03-294-1551 


マイ コン に よる 
有限 要素 解析 


戸川 隼人 著 A5 判 ・304 頁 
定価 3500 円 
本 書 は , マイ コン に か か る プロ グ 


ミン グ に つい て 分 り 易 < く 解説 し た 
入門 書 。 又 各 機種 を 使用 し た 場合 
の 相 培 点 の 解説 を 付す 等 汎用 性 に 
つい て も 十分 配慮 し た 書 

プロ グラ ムカ セッ ト PC-8001 
トラ ス の 計算 ・ 熱 伝導 計算 , 
MZ-80 ラー メン の 計算 ・ 平 面 応 
力 解析 


東京 都 千 代田 区 九段 南 4-3-12 
電話 ・ 東 京 (03) 262 一 5256 


培風館 


2- ツ エコ ン 書籍 雑誌 コー ナー 


ら 語 で 動 が すす パソ コン 


@5 WORDS BASIC 

タダ イヤ モン ド OAX%: ト 研究 会 編 四 大 判 /980 円 (〒250) 
単純 明快 な ゲロ グラ ム と 解説 で 、 ノ パソ コン 語 の 基本 を が 
っ ちり 理解 で きる 入門 書 。 “PRINT、 INPUT、 GOTO、 
IF、END" の 5 語 を マス ター する だ け で 、 
自在 に 活用 で き る よう に な れる / 


パソ コン を 


パソ コン 自由 自在 5g 色 衣 
@ 1 日 ] 時間 7 日 で マス ター 
服部 康夫 本 間 泰 則 著 四 六 判 /980 円 (〒250) 


注 目 の 独 習 ツ フ ト で 


cr. 四 (ビジ ッ ク ) 
: 人 PC-800| 用 (NEC) 
*PC-880| に も 使用 可能 
, 葵 MZ-80B 用 (シャ ー プ ) 
|: 念 IF-800 用 ( 沖 電 気 ) 
定価 20.000 円 (ディ スク 1 枚 ) 


2 

テー プ 

@PC-800| 用 (NEC) 
*PC-880| に も 使用 可能 

@MZ-80B 用 (シャ ー プ ) 

@FM-8 用 (富士 通 ) 

定価 7.000 円 

(テー プ 2 本 ・ 送 料 240 円 ) 

※ お 申し 込み は 現金 書留 で 小 社 販売 本 部 へ 


電話 03(504) 6515 


ント ェ 
0 : 敵 右 」 | 
Ce 
N-BASIC プ ログ ラム シー ト まほ マ ペア 
電気 ・ 電 子 ・ 通 信 ・ 情 報 工学 科 コ ー ス 編 。 4 イ 万 
宮地 杭 一 (芝浦 工業 大 学 学長 ) 窟 シ に 
@ 革 本 応用 34 例 @ 微分 方 程 式 応用 回 本 
10 例 電子 回 路 応用 48 例 自動 制 。 路 全 の 
御 応用 11 例 @ 本 書 に 使用 の 112 本 ソ 設 旗 技 
フト 発売 @ 定 価 \2.500 間 | 3 
座 術 
マイ クロ コ フ 80 有 ni 引 
ンピュータ きる 者 
佐々 木 正 ・ 井 内 優 ・ 大 原 茂 科 疲 > > 。 が 
@ 80 の 構成 と 動作 @ 各 レジ スタ 30 グ ン 5 
の 動作 ・ ンプ リ 語 と 機械 語 分 4 の 
e 市 倒 モ ント 使い 方 @ ク イミ ンク 15 謙 買 
e 定 価 Y2. 500 プ よ 1 
2 N 
タ ?2 ロ a8085 本 座 ーー ナス 
回 aa 1 副 | ト 
大 原 茂 之 @ \2.500 8087/ 8088 読 紀 | セ 
実戦 パー ソナ ルコ ンピュータ [1 付 ラ ラ 
@ 沖 電気 IF-800 の 正しい 使い 方 y 8 ーー 1] 
e プ ログ ラミ ング 技法 の 各種 例 に 計 医 ビ 
実戦 パー ソナ ルコ ンピュータ 2 0 ぉ g 三 : 
@ ペ ベー シッ ク 茶 本 パタ ー ン と 応用 0 と ププ 
10 例 題 集 ・ 各 種実 用 7 例 の 作り 方 9 ト オ 
@ 定 価 \2.000(1, [2] 各 穫 ) 3 計 」 


〒105 東 
・3360 向 


都 港 区 芝 公 園 3-5-8 機械 振興 会 館 ビ ル 容 03-434-8211( 代 
析 エ レク トロ ニク スズ ダイ ジェ スト カタ ログ 進呈 


HH ML 
「 WoO/3 


を 満載 し た 「MZ ア フリ ケ 
ク 」 定価 300 円 


お 求め は お 近く の 有名 マイ コン ショ ッ プ 、 また は 切手 500 円 (〒200 円 
共 ) を 同封 の 上 、 直接 当社 まで お 申し 込み くだ さい 。 


幅 放 送出 版 華 542 大 阪 市 南 区 上 汐 2- 4-6 上 六 セ ンタ ー ビ ル 谷 06(761)6161 


ITN 人 Sng のり ゆ 】 


DPNMIEY1 


へ ヽ 旨 悦 可 ッ ト Rno・ 寝 の 間 @ 


へ 
プン | 


| 
ム 
に < 
オ 
フ 
イ 
ス 
由 


0 テー・ テ て ・ 和 NIC て 滞 V 中 ー ミ とい @ 


PJ 


平沢 進 ・ 著 
\2200 〒250 


西尾 文明 ・ 著 
\2200 〒250 


ラジ オ 技 術 社 


\1600 〒300 


Tree ES 
全 03 (251) 0589 〒101 


マイ プ = 


横山 和 680 円 者 正樹 1800 円 = 11 條 黒 正樹 1800 円 
填 が 的 な 知識 を 、 正 確 コン の 完全 理解 の 


いち ば ん 分 か り 易 い 


バ ソ コン 入門 


LTEJ 用 ワン ボー ド マ の 


生コン 


Ro -、 基 礎 を 重 視 し l 全 理 解 が 、 フ ル 活 用 
108 の 練習 問題 へ の 最短 距離 。 そ の 手 
1 順 を 示し な が ら 、 機 械 


語 を 基礎 か ら 応 用 ゲー 
ム ま で オリ ジ ナ ルプ ゼロ 


グラ ム を 使っ て 解説 
NEC PCBOOO シ リー ズ 


パー ソナ ルコ ンピュータ 人 門 


寺 縛 = = 雄 1800 円 


ポス = デ テン が レ 1 
t 計 分 析 、 金 利 
届 時 、 意思 決定 の た め 


psk:gAsic 甘 人 演 習 教 本 


柳沢 ・ 福 岡 2300 円 
NEC の PC 一 8000 シリ 
で 使わ れ て いる N 
BASIC。 言語 を 使い 
ビジ ネス 実務 計 1 算 に 役 
に 、 実 用 性 重視 
か ら 生 まれ た 本 。 基礎 
か ら 応 用 ま て 実例 豊富 


高橋 三雄 2300 円 


情報 化 時 代 N9 の ビジ ネス 


必須 の 


ン > レ ンション グ 
1 を ど と 者 に わか り 
や すい パソ コン を 使 


た 応 用 法 


NEC ご C-8 ほ 8 〇 OO シリー ズ 


プロ グラ ミン グ 教 本 


三 2300 円 5 111・ 後 際 2300 円 
ビジ 用 実用 プロ ク 2 9 Es 害 / ィ イ スク を 組み 込む 
z ム を と 例 に 、 誰 も が 、 - と で デー タ 処 理 量 を 
す * に PC-8801 を 使い 層 効 果 的 か つ 飛 躍 的 に 
- な せる よう に 基礎 か 増大 きせ る 。 了 予備 知 識 
ら 応 用 まで 実例 を 必要 と せ ず に 、 デ ィ 


だ ん に あげ 解説 


て eucwu っ > と ュー ピコ コ 
APC PC-600| 
ブロ グラ ミン グ 教 本 


後藤 猛 2300 円 


や さ し く 楽し い コ ン ピ 


スク の プロ グラ ミ グ 


や 考え 方 を 詳解 する 


シャ ー プ PC-32 〇 〇 


バン コン 速 習 読本 ンピュータ 総合 カタ ログ 


1 淳 2300 suasp Pc-aeoo | 監修 田 ) -2500 円 AM 編 2500 円 
横山 光 証人 ーー 田尾 陽 - R 編 
ジャ Z の 最新 鋭 パ - 2 5 シャ ー プ PC-3200 を 徹 * ソ コン を 活用 する た 
ソナ ルコ ンピュータ M 9 底 的 に 使い こなす た め め 6 0 
1 な 80B を 使 いこ な す ん 、 ケ テ ジジ ソフ ト と 


! 262 ン 、 関 連 機 


+ 


こめ の 基礎 か ら 応 用 ま 
で を 解り 易く 解説 し た 
プロ グラ ミン グ 教 本 


は 何 か 、 そ し て その 実 
際 を 利用 者 の 立場 か ら 
解説 し 、 更 に 汎用 処理 
シス テム まで を 解説 


ン 利 ) H 法 2 か が イド 〇 す 
ぐに 役立つ パッ ケー ジ 
ソフ トウ ェ ア を 満載 / 


OA 時 代 の パソ コン ・ オ フ コ ン 情報 誌 


ec 還 是 " 
oi 
年 4 回 /3 月 6 月 9 月 11 月 発売 850 円 


〒105 東京 都 港 区 芝 2-23-13 諸 済 党 出 版 上 08G53)1201 


マイ コン 総合 読 の エー スニ "月 刊 ラ ム 」 


毎 
21 
発 


@ マイ コン に 強く な る 知識 と 情報 450 円 


較 ビジ ネス コー ス 
入門 |… は じ め て の 方 の た め に 
ト 4 
基礎 |… よ り 深 い 理 解 へ 
ャ 
応用 |… 実 用 的 クウ ハウ の 演習 
田 女 性 コー ス 
生活 の 知恵 の 新 発 見 
較 冬 休み 小 中 高 生 コ ー ス 
較 PC-8000 シ リー ズ 1 人 1 人 台 
( 全 機 フ ロッ ピー 装備 ) 
園 監修 : Ao 機 大 学 肥 才 授 ) 


A/77X 文化 セン ター 


バフ コッ 


圏 教室 : 東京 都 渋谷 区 宇田 川町 7 一 13 
レーー ベ リノ > 第 2 共同 ビル 2 階 (NHK 放 送 セ ンタ ー 隣 ) 


が ガバ モー ケー ジー ビン 


プロ グラ ミン グ 入 門 の 決定 版 / 


マイ コン BASIC 入 門 


[ 走 m ァ ゴマ. -  ] 石田 晴久 著 定価 2OO 円 〒250 
NN Fe ーー マイ コン で よく 使わ れる プロ グラ ミン グ 言 
ぃ ノ 
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方 や 手法 を 、 初 歩か ら は じ め て 応用 まで 、 

く の 実 例 を 示し な が ら 、 や さ し く 解説 。 

< 主 な 内 容 > マイ コン と BASIC 言 語 ン 

BASIC プ ログ ラム の 編集 と 保存 基本 フ 
ログ ラミ ング 大 量 デ ー タ の 扱い ププ こと ば 
の 処理 マイ コン ・ グ ラフ ィ ッ クス デー タ 


の ファ イリ ング BASIC を 越え て 


ブロ グラ ム を 実行 させ る オマ ジ ナ イ ( 日 本 放送 出版 協会 ) 


TALK530 


硬 回 回 回 回 隊 較 国 固 図 四 


画 回 画 罰 画 頭 咽 員 TALKINN 


富士 ゼロ ックス で は 、TALK500 シ リー ズ の 優れ た 機能 を 実感 し て いた だ く (だ 
め 、 富 士 ゼ ロッ クス 「TALK INN」 を 開設 。VTR(20 分 間 ) を 見 な が ら 実 際 に 
パソ コン を 操作 する 学習 コー ナー を 設け て いま す 。 見 て 、 触 れ て 、 そ の 使い や す 
き を お 確か めく だ さい 。 ま た 、 よ り 深 て ご 理解 いた だ くだ た ゅ 「TALK SCHOOL」 
ぁ 併設 。1 人 に つき TALK500 シ リー ズ 1 古 の 徹底 指導 に より 、 初 心 者 で も 3 日 半 
で TALK を マス ター し て い だ だ け ま す 。 


プロ グラ ミン グ 不 要 。 富 士 ゼ ロッ クス が つく る と パソ コン も 、 
ほん と うに 使い や すく な る 。 


コン ピュ ー タ ー の ネッ ク と いわ れ て いる プログ ラミ ング 
の 上 難し き 、 複 雑 な オペ レー ショ ン を 解消 し た パソ コン が 
TALK530 で す 。 日 本 の ビジ ネス に 適し た ノン ブログ 
ラミ ング の 画 期 的 ソフト ウェ ア PIPS* を 標準 装備 。 カ 
ンタ ン な 対話 形式 で 、 必 要 な デー タ の 並べ 替え や 演 
算 、 グ ラフ 化 も 自由 自在 。 フ ロッ ピー ディ スク も 業務 量 
に 応じ て 3 種類 を 用 意 し まし た 。 も ちろ ん BASIC を は じゅ 、 
その 他 の 言語 も 業務 に 合わ せ て お 使い いた だ け ま す 。 


(※PIPS と は 「Pan Information Processing System」 の 略 で す ) 


@ マ ル チ 処 理 機能 、 通 信 ・ グ ラフ ィ ッ ク 機 能 、 漢 字 処 理 機能 (オプ 
ショ ン ) を 備え た 高級 機 TALK550 も 新 登 場 。 


東京 TALK INN 
〒100 東京 都 千 代田 区 霞が関 3-2-6 
東京 倶楽部 ビル 1F( 霞 が 関 ビ ル 隣 り ) 
TEL. 03(581) 6531 


大 阪 TALK INN 
〒542 大 阪 府 大 阪 市 南 区 南船場 3-9-15 


武田 ビル 7F (心斎橋 下車 2 分 ) 
TEL. 06 (245) 6981 


富士 ゼロ ックス 株 式 会 社 
ビジ ネス コン ピュ ー タ ーー 事業 部 
〒100 東京 都 千 代田 区 霞が関 3 一 2 一 6 
東京 倶楽部 ビル 1F (霞が関 ビル 隣り ) 
TEL. 03(581) 6531 
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TOSHIBA 
多用 な ソフ ド で 
レ パ ジ ビブ 」 は ます ます 輝い て くる 。 


ゴゴ 語 加 | 十 革 直 十 田 習 遍 


「 国 語 練習 (漢字 の 読み 方)」 「 損 益 分 岐 点 算出 プロ ブラ ム 」 


ud 


「 音 楽 練習 「 マ スタ ー マ イ ンド 。 「 見 積 プ ロブ ラム 」 「 ニ ュー トン 法 。 
これ が 欲し い 。 これ も 欲し い 。 9 表 庭 で いろ い 24 
電話 番号 号 管 理 プ ログ ラム 、 住 所 録 管理 プロ グ 全国 に 着 々 ほ 広 が る 東芝 パッ コン サロ ン で パッ ピア 」 を 試し た きい 。 
「 レ パン ピア 」 で 使え る ソフ ト ・ カ タロ グ 9 東芝 ペソ コン サロ ン ・ 札 幌 
ー で 全 え ! ョ ラム 、 音 None om 賞 理 な ど 。 < 晶 デ ィ テ ー ル 〉 TEL(011)221-5023 
っ 表土 に 値 い 7 借 技 和 東芝 パソ コン サロ ン ・ 仙 台 
Fa: 直り < 入 匿 庫 忠 ) TEL(0222)75-2203 


国語 練習 、 英 会 話 レッ スン 英 単 語 レッ スン な ど 。 ニュ ー ト oe 析 多元 連 立方 程 式 、 測 量 計算 な ど 。 東芝 パソ コン サロ ン ・ 大 宮 


〈 立 シ ステ ムリ サー チ 帳 > TEL(0486)51-1100 


@ ゲー ム を 送 / この ほか に も パッ ピア の ソフ ト は 着 々 と 充実 。 | 東 評 パソ コン サロ ン . 秋 葉 原 
スー パー スタ ー ト レッ ク ペース ボ ー ル 、 スー パー すぐ れ た 機能 性 が る ら に 発揮 で きま も real 
ゴル フス ポイ ント ゲッ ター な ど 。 < 緑 屋 電気 喘 > TEL(03)574-0941 
@ | 2 E 日 東芝 パソ コン サロ ン ・ 渋 谷 


< 日 本 情報 通信 シス テム ( 抽 > TEL(03)499-5571 
東芝 パソ コン サロ ン ・ 名 古屋 
< 日 本 ビジ ネス オー トメ ーション 帆 > TEL(052)202-1048 
東芝 パソ コン サロ ン ・ 大 阪 

大 阪 パ ソン ビ ピア 起 > TEL(06)344-0765 
東芝 パソ コン サロ ン ・ 広 島 

東芝 ビジ ネス コン ピュ ー タ 喚 〉 TEL(082)2 49-6762 」 
東芝 パソ コン サロ ン ・ 福 岡 
< 九州 電子 機器 サー ビス 費 ) TEL(092)711-1915 


0A-BASIC の も と で 使え る ユー ティ リティ ー と し て 
マト リッ クス 、 グラ フッ ケー ジフ ァイル マネ ー 
ジャ 、 カ ナ 漢 字 入力 パッ ケー ジ な ど 各 種 充実 。 
また 損益 分 岐 点 算出 、 仕 入管 理 、 販 売 管理 、 
在庫 管理 な どの パッ ケー ジ を 用 意 。 


@ バ パー ソナ ルコ ンピュータ 「 バ パン ピア 」 
PA7010/7012 163.000 円 (本 体 価格 ) 

@ フ ァ イ ン カラ ー デ ティ スプ レイ PA7161 168.000 円 

@ ミ ニ フ ロ ッ ピ ー デ ィ ス ク ユニ ッ ト PA7200 290.000 円 
0A-DISK-BASIC、T-DISK- BASIC は 別売 ( 各 18.000 円 ) 

@ ド ッ ト プ リン タ II PA7251 153.000 円 


東芝 パー ソナ ルコ ンピュータ 


( 
12 
に 
資料 請求 券 の お 問い 合わ せ 、 
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